home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: Mailbox/MIME Entity
(archive/mbox).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| Mailbox/MIME Entity (archive/mbox)
| magic
| Supported |
| 100%
| dexvert
| Internet Message Format (text/imf)
| magic
| Supported |
| 1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
| 100%
| file
| Mailbox text, 1st line "From rick@seismo.CSS.GOV Thu Oct 8 00:13:16 1987"
| default
| |
| 99%
| file
| C source, ASCII text
| default
| |
| 100%
| TrID
| E-Mail message (Var. 2)
| default
| |
| 100%
| checkBytes
| Printable ASCII
| default
| |
| 100%
| perlTextCheck
| Likely Text (Perl)
| default
| |
| 100%
| detectItEasy
| Format: Plain text[LF]
| default
| |
| 100%
| xdgMime
| application/mbox
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 72 6f 6d 20 72 69 63 | 6b 40 73 65 69 73 6d 6f |From ric|k@seismo|
|00000010| 2e 43 53 53 2e 47 4f 56 | 20 54 68 75 20 4f 63 74 |.CSS.GOV| Thu Oct|
|00000020| 20 20 38 20 30 30 3a 31 | 33 3a 31 36 20 31 39 38 | 8 00:1|3:16 198|
|00000030| 37 0a 50 61 74 68 3a 20 | 73 65 69 73 6d 6f 21 72 |7.Path: |seismo!r|
|00000040| 69 63 6b 0a 46 72 6f 6d | 3a 20 72 69 63 6b 40 73 |ick.From|: rick@s|
|00000050| 65 69 73 6d 6f 2e 43 53 | 53 2e 47 4f 56 20 28 52 |eismo.CS|S.GOV (R|
|00000060| 69 63 6b 20 41 64 61 6d | 73 29 0a 4e 65 77 73 67 |ick Adam|s).Newsg|
|00000070| 72 6f 75 70 73 3a 20 6e | 65 77 73 2e 73 6f 66 74 |roups: n|ews.soft|
|00000080| 77 61 72 65 2e 62 0a 53 | 75 62 6a 65 63 74 3a 20 |ware.b.S|ubject: |
|00000090| 6e 65 77 73 20 32 2e 31 | 31 20 73 72 63 20 70 61 |news 2.1|1 src pa|
|000000a0| 74 63 68 20 23 31 30 0a | 4b 65 79 77 6f 72 64 73 |tch #10.|Keywords|
|000000b0| 3a 20 23 31 31 20 63 6f | 6d 69 6e 67 20 73 6f 6f |: #11 co|ming soo|
|000000c0| 6e 2e 2e 2e 0a 4d 65 73 | 73 61 67 65 2d 49 44 3a |n....Mes|sage-ID:|
|000000d0| 20 3c 34 34 31 30 34 40 | 62 65 6e 6f 2e 73 65 69 | <44104@|beno.sei|
|000000e0| 73 6d 6f 2e 43 53 53 2e | 47 4f 56 3e 0a 44 61 74 |smo.CSS.|GOV>.Dat|
|000000f0| 65 3a 20 38 20 4f 63 74 | 20 38 37 20 30 34 3a 31 |e: 8 Oct| 87 04:1|
|00000100| 33 3a 31 36 20 47 4d 54 | 0a 4f 72 67 61 6e 69 7a |3:16 GMT|.Organiz|
|00000110| 61 74 69 6f 6e 3a 20 43 | 65 6e 74 65 72 20 66 6f |ation: C|enter fo|
|00000120| 72 20 53 65 69 73 6d 69 | 63 20 53 74 75 64 69 65 |r Seismi|c Studie|
|00000130| 73 2c 20 41 72 6c 69 6e | 67 74 6f 6e 2c 20 56 41 |s, Arlin|gton, VA|
|00000140| 0a 4c 69 6e 65 73 3a 20 | 32 35 34 36 0a 0a 44 65 |.Lines: |2546..De|
|00000150| 73 63 72 69 70 74 69 6f | 6e 3a 0a 09 54 68 69 73 |scriptio|n:..This|
|00000160| 20 69 73 20 70 61 74 63 | 68 20 23 31 30 20 66 6f | is patc|h #10 fo|
|00000170| 72 20 6e 65 77 73 20 32 | 2e 31 31 20 73 72 63 2e |r news 2|.11 src.|
|00000180| 0a 0a 09 52 65 6d 6f 76 | 65 20 34 2e 31 43 20 42 |...Remov|e 4.1C B|
|00000190| 53 44 20 63 6f 6e 64 69 | 74 69 6f 6e 61 6c 73 2e |SD condi|tionals.|
|000001a0| 0a 09 4c 69 6e 74 20 61 | 6e 64 20 6d 69 6e 6f 72 |..Lint a|nd minor|
|000001b0| 20 73 70 65 65 64 75 70 | 73 2e 0a 09 42 61 74 63 | speedup|s...Batc|
|000001c0| 68 20 61 63 63 65 70 74 | 73 20 62 6c 61 6e 6b 73 |h accept|s blanks|
|000001d0| 20 6c 69 6e 65 73 20 69 | 6e 20 66 69 6c 65 73 2e | lines i|n files.|
|000001e0| 0a 09 54 68 65 20 49 48 | 43 43 20 64 65 66 69 6e |..The IH|CC defin|
|000001f0| 65 20 77 61 73 20 72 65 | 70 6c 61 63 65 64 20 62 |e was re|placed b|
|00000200| 79 20 73 65 76 65 72 61 | 6c 20 64 65 66 69 6e 65 |y severa|l define|
|00000210| 73 0a 09 61 6c 6c 6f 77 | 69 6e 67 20 79 6f 75 20 |s..allow|ing you |
|00000220| 74 6f 20 73 65 6c 65 63 | 74 20 70 61 72 74 20 6f |to selec|t part o|
|00000230| 66 20 74 68 65 20 49 48 | 43 43 20 66 75 6e 63 74 |f the IH|CC funct|
|00000240| 69 6f 6e 61 6c 69 74 79 | 2e 0a 09 46 69 78 20 6e |ionality|...Fix n|
|00000250| 65 77 67 72 6f 75 70 20 | 6d 65 73 73 61 67 65 73 |ewgroup |messages|
|00000260| 20 66 6f 72 20 6d 6f 64 | 65 72 61 74 65 64 20 67 | for mod|erated g|
|00000270| 72 6f 75 70 73 2e 0a 09 | 4d 69 6e 6f 72 20 64 61 |roups...|Minor da|
|00000280| 74 65 20 63 6f 6e 76 65 | 72 73 69 6f 6e 20 66 69 |te conve|rsion fi|
|00000290| 78 20 74 6f 20 65 78 70 | 69 72 65 2e 0a 09 4c 6f |x to exp|ire...Lo|
|000002a0| 74 73 20 6f 66 20 63 68 | 61 6e 67 65 73 20 74 6f |ts of ch|anges to|
|000002b0| 20 72 75 6e 20 75 6e 64 | 65 72 20 58 65 6e 69 78 | run und|er Xenix|
|000002c0| 20 28 69 6e 63 6c 75 64 | 69 6e 67 20 6c 6f 63 6b | (includ|ing lock|
|000002d0| 69 6e 67 20 49 20 74 68 | 69 6e 6b 29 2e 0a 09 73 |ing I th|ink)...s|
|000002e0| 74 72 63 61 73 65 63 6d | 70 28 29 20 72 6f 75 74 |trcasecm|p() rout|
|000002f0| 65 69 6e 20 75 73 65 64 | 20 66 6f 72 20 63 61 73 |ein used| for cas|
|00000300| 65 20 69 6e 64 65 70 65 | 6e 64 61 6e 74 20 63 6f |e indepe|ndant co|
|00000310| 6d 70 61 72 69 73 6f 6e | 73 2e 0a 09 73 74 72 63 |mparison|s...strc|
|00000320| 6d 70 2c 73 74 72 6e 63 | 6d 70 2c 20 70 72 65 66 |mp,strnc|mp, pref|
|00000330| 69 78 20 72 65 70 6c 61 | 63 65 64 20 77 69 74 68 |ix repla|ced with|
|00000340| 20 6d 61 63 72 6f 73 20 | 69 6e 20 61 6e 20 61 74 | macros |in an at|
|00000350| 74 65 6d 70 74 0a 09 09 | 74 6f 20 73 71 75 65 65 |tempt...|to squee|
|00000360| 7a 65 20 6d 6f 72 65 20 | 73 70 65 65 64 20 6f 75 |ze more |speed ou|
|00000370| 74 2e 0a 09 53 75 70 70 | 6f 72 74 20 66 6f 72 20 |t...Supp|ort for |
|00000380| 74 68 65 20 22 53 75 70 | 65 72 73 65 64 65 73 3a |the "Sup|ersedes:|
|00000390| 22 20 68 65 61 64 65 72 | 20 6c 69 6e 65 20 61 64 |" header| line ad|
|000003a0| 64 65 64 2e 0a 09 53 65 | 6e 64 62 61 74 63 68 20 |ded...Se|ndbatch |
|000003b0| 66 69 78 65 64 20 74 6f | 20 77 6f 72 6b 20 77 68 |fixed to| work wh|
|000003c0| 65 6e 20 27 74 65 73 74 | 27 20 69 73 20 61 20 62 |en 'test|' is a b|
|000003d0| 75 69 6c 74 69 6e 2e 0a | 09 4e 65 77 20 64 65 66 |uiltin..|.New def|
|000003e0| 69 6e 65 73 20 61 64 64 | 65 64 20 74 6f 20 64 65 |ines add|ed to de|
|000003f0| 66 73 2e 64 69 73 74 3a | 0a 09 09 52 45 41 44 44 |fs.dist:|...READD|
|00000400| 49 52 09 09 28 68 61 73 | 20 6f 70 65 6e 64 69 72 |IR..(has| opendir|
|00000410| 28 29 2c 20 65 74 63 20 | 69 6e 20 6c 69 62 63 29 |(), etc |in libc)|
|00000420| 0a 09 09 4d 4b 44 49 52 | 5f 53 55 42 09 28 6d 6b |...MKDIR|_SUB.(mk|
|00000430| 64 69 72 28 29 20 69 73 | 20 69 6e 20 6c 69 62 63 |dir() is| in libc|
|00000440| 29 0a 09 09 44 4f 47 45 | 54 55 53 45 52 09 28 61 |)...DOGE|TUSER.(a|
|00000450| 6c 77 61 79 73 20 64 6f | 20 61 20 67 65 74 75 73 |lways do| a getus|
|00000460| 65 72 28 29 20 2d 20 77 | 61 73 20 70 61 72 74 20 |er() - w|as part |
|00000470| 6f 66 20 49 48 43 43 29 | 0a 09 09 4c 4f 47 44 49 |of IHCC)|...LOGDI|
|00000480| 52 09 09 28 72 65 61 64 | 20 70 61 74 68 6e 61 6d |R..(read| pathnam|
|00000490| 65 73 20 66 72 6f 6d 20 | 66 69 6c 65 20 2d 20 77 |es from |file - w|
|000004a0| 61 73 20 70 61 72 74 20 | 6f 66 20 49 48 43 43 29 |as part |of IHCC)|
|000004b0| 0a 0a 46 69 78 3a 0a 09 | 63 64 20 74 6f 20 74 68 |..Fix:..|cd to th|
|000004c0| 65 20 73 72 63 20 64 69 | 72 65 63 74 6f 72 79 20 |e src di|rectory |
|000004d0| 61 6e 64 20 61 70 70 6c | 79 20 74 68 65 20 66 6f |and appl|y the fo|
|000004e0| 6c 6c 6f 77 69 6e 67 20 | 70 61 74 63 68 2e 0a 0a |llowing |patch...|
|000004f0| 49 6e 64 65 78 3a 20 62 | 61 74 63 68 2e 63 0a 50 |Index: b|atch.c.P|
|00000500| 72 65 72 65 71 3a 20 31 | 2e 31 38 0a 2a 2a 2a 20 |rereq: 1|.18.*** |
|00000510| 2e 64 2f 62 61 74 63 68 | 2e 63 09 57 65 64 20 4f |.d/batch|.c.Wed O|
|00000520| 63 74 20 20 37 20 31 36 | 3a 34 38 3a 31 33 20 31 |ct 7 16|:48:13 1|
|00000530| 39 38 37 0a 2d 2d 2d 20 | 62 61 74 63 68 2e 63 09 |987.--- |batch.c.|
|00000540| 57 65 64 20 4f 63 74 20 | 20 37 20 31 38 3a 34 38 |Wed Oct | 7 18:48|
|00000550| 3a 35 34 20 31 39 38 37 | 0a 2a 2a 2a 2a 2a 2a 2a |:54 1987|.*******|
|00000560| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 2a 2a 2a 20 33 34 2c |********|.*** 34,|
|00000570| 33 36 20 2a 2a 2a 2a 0a | 20 20 23 69 66 64 65 66 |36 ****.| #ifdef|
|00000580| 20 53 43 43 53 49 44 0a | 21 20 73 74 61 74 69 63 | SCCSID.|! static|
|00000590| 20 63 68 61 72 09 2a 53 | 63 63 73 49 64 20 3d 20 | char.*S|ccsId = |
|000005a0| 22 40 28 23 29 62 61 74 | 63 68 2e 63 09 31 2e 31 |"@(#)bat|ch.c.1.1|
|000005b0| 38 09 31 32 2f 31 36 2f | 38 36 22 3b 0a 20 20 23 |8.12/16/|86";. #|
|000005c0| 65 6e 64 69 66 20 2f 2a | 20 53 43 43 53 49 44 20 |endif /*| SCCSID |
|000005d0| 2a 2f 0a 2d 2d 2d 20 33 | 34 2c 33 36 20 2d 2d 2d |*/.--- 3|4,36 ---|
|000005e0| 2d 0a 20 20 23 69 66 64 | 65 66 20 53 43 43 53 49 |-. #ifd|ef SCCSI|
|000005f0| 44 0a 21 20 73 74 61 74 | 69 63 20 63 68 61 72 09 |D.! stat|ic char.|
|00000600| 2a 53 63 63 73 49 64 20 | 3d 20 22 40 28 23 29 62 |*SccsId |= "@(#)b|
|00000610| 61 74 63 68 2e 63 09 31 | 2e 31 39 09 31 30 2f 37 |atch.c.1|.19.10/7|
|00000620| 2f 38 37 22 3b 0a 20 20 | 23 65 6e 64 69 66 20 2f |/87";. |#endif /|
|00000630| 2a 20 53 43 43 53 49 44 | 20 2a 2f 0a 2a 2a 2a 2a |* SCCSID| */.****|
|00000640| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 2a 2a 20 |********|***.*** |
|00000650| 34 33 2c 34 35 20 2a 2a | 2a 2a 0a 20 20 0a 21 20 |43,45 **|**. .! |
|00000660| 23 69 66 20 64 65 66 69 | 6e 65 64 28 55 53 47 29 |#if defi|ned(USG)|
|00000670| 20 7c 7c 20 64 65 66 69 | 6e 65 64 28 42 53 44 34 | || defi|ned(BSD4|
|00000680| 5f 32 29 20 7c 7c 20 64 | 65 66 69 6e 65 64 28 42 |_2) || d|efined(B|
|00000690| 53 44 34 5f 31 43 29 0a | 20 20 23 69 6e 63 6c 75 |SD4_1C).| #inclu|
|000006a0| 64 65 20 3c 66 63 6e 74 | 6c 2e 68 3e 0a 2d 2d 2d |de <fcnt|l.h>.---|
|000006b0| 20 34 33 2c 34 35 20 2d | 2d 2d 2d 0a 20 20 0a 21 | 43,45 -|---. .!|
|000006c0| 20 23 69 66 20 64 65 66 | 69 6e 65 64 28 55 53 47 | #if def|ined(USG|
|000006d0| 29 20 7c 7c 20 64 65 66 | 69 6e 65 64 28 42 53 44 |) || def|ined(BSD|
|000006e0| 34 5f 32 29 0a 20 20 23 | 69 6e 63 6c 75 64 65 20 |4_2). #|include |
|000006f0| 3c 66 63 6e 74 6c 2e 68 | 3e 0a 2a 2a 2a 2a 2a 2a |<fcntl.h|>.******|
|00000700| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0a 2a 2a 2a 20 36 34 |********|*.*** 64|
|00000710| 2c 36 35 20 2a 2a 2a 2a | 0a 2d 2d 2d 20 36 34 2c |,65 ****|.--- 64,|
|00000720| 36 36 20 2d 2d 2d 2d 0a | 20 20 09 63 68 61 72 20 |66 ----.| .char |
|00000730| 77 6f 72 6b 66 69 6c 65 | 5b 35 31 32 5d 3b 0a 2b |workfile|[512];.+|
|00000740| 20 09 63 68 61 72 20 63 | 62 75 66 5b 42 55 46 53 | .char c|buf[BUFS|
|00000750| 49 5a 5d 3b 0a 20 20 09 | 63 68 61 72 20 2a 69 6e |IZ];. .|char *in|
|00000760| 64 65 78 28 29 2c 20 2a | 66 67 65 74 73 28 29 3b |dex(), *|fgets();|
|00000770| 0a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.*******|********|
|00000780| 0a 2a 2a 2a 20 31 30 32 | 2c 31 30 33 20 2a 2a 2a |.*** 102|,103 ***|
|00000790| 2a 0a 2d 2d 2d 20 31 30 | 33 2c 31 30 36 20 2d 2d |*.--- 10|3,106 --|
|000007a0| 2d 2d 0a 20 20 09 09 09 | 2a 63 70 20 3d 20 27 5c |--. ...|*cp = '\|
|000007b0| 30 27 3b 0a 2b 20 09 09 | 69 66 20 28 66 6e 61 6d |0';.+ ..|if (fnam|
|000007c0| 65 5b 30 5d 20 3d 3d 20 | 27 5c 30 27 29 0a 2b 20 |e[0] == |'\0').+ |
|000007d0| 09 09 09 63 6f 6e 74 69 | 6e 75 65 3b 0a 20 20 09 |...conti|nue;. .|
|000007e0| 09 6e 66 64 20 3d 20 66 | 6f 70 65 6e 28 66 6e 61 |.nfd = f|open(fna|
|000007f0| 6d 65 2c 20 22 72 22 29 | 3b 0a 2a 2a 2a 2a 2a 2a |me, "r")|;.******|
|00000800| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0a 2a 2a 2a 20 31 31 |********|*.*** 11|
|00000810| 30 2c 31 31 31 20 2a 2a | 2a 2a 0a 2d 2d 2d 20 31 |0,111 **|**.--- 1|
|00000820| 31 33 2c 31 31 36 20 2d | 2d 2d 2d 0a 20 20 09 09 |13,116 -|---. ..|
|00000830| 09 2a 63 70 20 3d 20 27 | 5c 6e 27 3b 0a 2b 20 09 |.*cp = '|\n';.+ .|
|00000840| 09 69 66 20 28 73 62 75 | 66 2e 73 74 5f 73 69 7a |.if (sbu|f.st_siz|
|00000850| 65 20 3d 3d 20 30 29 0a | 2b 20 09 09 09 63 6f 6e |e == 0).|+ ...con|
|00000860| 74 69 6e 75 65 3b 0a 20 | 20 09 09 6e 62 79 74 65 |tinue;. | ..nbyte|
|00000870| 73 20 2b 3d 20 73 62 75 | 66 2e 73 74 5f 73 69 7a |s += sbu|f.st_siz|
|00000880| 65 3b 0a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |e;.*****|********|
|00000890| 2a 2a 0a 2a 2a 2a 20 31 | 31 37 2c 31 32 31 20 2a |**.*** 1|17,121 *|
|000008a0| 2a 2a 2a 0a 20 20 09 09 | 6e 20 3d 20 30 3b 0a 21 |***. ..|n = 0;.!|
|000008b0| 20 09 09 77 68 69 6c 65 | 20 28 28 63 20 3d 20 67 | ..while| ((c = g|
|000008c0| 65 74 63 28 6e 66 64 29 | 29 20 21 3d 20 45 4f 46 |etc(nfd)|) != EOF|
|000008d0| 29 20 7b 0a 21 20 09 09 | 09 70 75 74 63 68 61 72 |) {.! ..|.putchar|
|000008e0| 28 63 29 3b 0a 21 20 09 | 09 09 6e 2b 2b 3b 0a 20 |(c);.! .|..n++;. |
|000008f0| 20 09 09 7d 0a 2d 2d 2d | 20 31 32 32 2c 31 32 36 | ..}.---| 122,126|
|00000900| 20 2d 2d 2d 2d 0a 20 20 | 09 09 6e 20 3d 20 30 3b | ----. |..n = 0;|
|00000910| 0a 21 20 09 09 77 68 69 | 6c 65 20 28 63 20 3d 20 |.! ..whi|le (c = |
|00000920| 66 72 65 61 64 28 63 62 | 75 66 2c 20 31 2c 20 73 |fread(cb|uf, 1, s|
|00000930| 69 7a 65 6f 66 20 63 62 | 75 66 2c 20 6e 66 64 29 |izeof cb|uf, nfd)|
|00000940| 29 20 7b 0a 21 20 09 09 | 09 66 77 72 69 74 65 28 |) {.! ..|.fwrite(|
|00000950| 63 62 75 66 2c 20 31 2c | 20 63 2c 20 73 74 64 6f |cbuf, 1,| c, stdo|
|00000960| 75 74 29 3b 0a 21 20 09 | 09 09 6e 20 2b 3d 20 63 |ut);.! .|..n += c|
|00000970| 3b 0a 20 20 09 09 7d 0a | 2a 2a 2a 2a 2a 2a 2a 2a |;. ..}.|********|
|00000980| 2a 2a 2a 2a 2a 2a 2a 0a | 2a 2a 2a 20 31 32 36 2c |*******.|*** 126,|
|00000990| 31 32 37 20 2a 2a 2a 2a | 0a 2d 2d 2d 20 31 33 31 |127 ****|.--- 131|
|000009a0| 2c 31 33 33 20 2d 2d 2d | 2d 0a 20 20 09 09 7d 0a |,133 ---|-. ..}.|
|000009b0| 2b 20 09 09 28 76 6f 69 | 64 29 20 66 66 6c 75 73 |+ ..(voi|d) fflus|
|000009c0| 68 28 73 74 64 6f 75 74 | 29 3b 0a 20 20 09 09 69 |h(stdout|);. ..i|
|000009d0| 66 20 28 6e 20 21 3d 20 | 73 62 75 66 2e 73 74 5f |f (n != |sbuf.st_|
|000009e0| 73 69 7a 65 29 20 7b 20 | 2f 2a 20 70 61 72 61 6e |size) { |/* paran|
|000009f0| 6f 69 61 20 2a 2f 0a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |oia */.*|********|
|00000a00| 2a 2a 2a 2a 2a 2a 0a 2a | 2a 2a 20 31 38 36 2c 31 |******.*|** 186,1|
|00000a10| 38 38 20 2a 2a 2a 2a 0a | 20 20 0a 21 20 23 69 66 |88 ****.| .! #if|
|00000a20| 20 64 65 66 69 6e 65 64 | 28 49 48 43 43 29 20 7c | defined|(IHCC) ||
|00000a30| 7c 20 64 65 66 69 6e 65 | 64 28 48 4f 4d 45 29 0a || define|d(HOME).|
|00000a40| 20 20 09 28 76 6f 69 64 | 29 20 73 70 72 69 6e 74 | .(void|) sprint|
|00000a50| 66 28 6c 66 6e 61 6d 65 | 2c 20 22 25 73 2f 25 73 |f(lfname|, "%s/%s|
|00000a60| 2f 65 72 72 6c 6f 67 22 | 2c 20 6c 6f 67 64 69 72 |/errlog"|, logdir|
|00000a70| 28 48 4f 4d 45 29 2c 20 | 4c 49 42 44 49 52 29 3b |(HOME), |LIBDIR);|
|00000a80| 0a 2d 2d 2d 20 31 39 32 | 2c 31 39 34 20 2d 2d 2d |.--- 192|,194 ---|
|00000a90| 2d 0a 20 20 0a 21 20 23 | 69 66 20 64 65 66 69 6e |-. .! #|if defin|
|00000aa0| 65 64 28 4c 4f 47 44 49 | 52 29 20 7c 7c 20 64 65 |ed(LOGDI|R) || de|
|00000ab0| 66 69 6e 65 64 28 48 4f | 4d 45 29 0a 20 20 09 28 |fined(HO|ME). .(|
|00000ac0| 76 6f 69 64 29 20 73 70 | 72 69 6e 74 66 28 6c 66 |void) sp|rintf(lf|
|00000ad0| 6e 61 6d 65 2c 20 22 25 | 73 2f 25 73 2f 65 72 72 |name, "%|s/%s/err|
|00000ae0| 6c 6f 67 22 2c 20 6c 6f | 67 64 69 72 28 48 4f 4d |log", lo|gdir(HOM|
|00000af0| 45 29 2c 20 4c 49 42 44 | 49 52 29 3b 0a 2a 2a 2a |E), LIBD|IR);.***|
|00000b00| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0a 2a 2a 2a |********|****.***|
|00000b10| 20 31 39 35 2c 31 39 37 | 20 2a 2a 2a 2a 0a 20 20 | 195,197| ****. |
|00000b20| 09 69 66 20 28 61 63 63 | 65 73 73 28 6c 66 6e 61 |.if (acc|ess(lfna|
|00000b30| 6d 65 2c 20 30 29 20 3d | 3d 20 30 20 26 26 20 28 |me, 0) =|= 0 && (|
|00000b40| 6c 6f 67 66 69 6c 65 20 | 3d 20 66 6f 70 65 6e 28 |logfile |= fopen(|
|00000b50| 6c 66 6e 61 6d 65 2c 20 | 22 61 22 29 29 20 21 3d |lfname, |"a")) !=|
|00000b60| 20 4e 55 4c 4c 29 20 7b | 0a 21 20 23 69 66 20 64 | NULL) {|.! #if d|
|00000b70| 65 66 69 6e 65 64 28 55 | 53 47 29 20 7c 7c 20 64 |efined(U|SG) || d|
|00000b80| 65 66 69 6e 65 64 28 42 | 53 44 34 5f 32 29 20 7c |efined(B|SD4_2) ||
|00000b90| 7c 20 64 65 66 69 6e 65 | 64 28 42 53 44 34 5f 31 || define|d(BSD4_1|
|00000ba0| 43 29 0a 20 20 09 09 69 | 6e 74 20 66 6c 61 67 73 |C). ..i|nt flags|
|00000bb0| 3b 0a 2d 2d 2d 20 32 30 | 31 2c 32 30 33 20 2d 2d |;.--- 20|1,203 --|
|00000bc0| 2d 2d 0a 20 20 09 69 66 | 20 28 61 63 63 65 73 73 |--. .if| (access|
|00000bd0| 28 6c 66 6e 61 6d 65 2c | 20 30 29 20 3d 3d 20 30 |(lfname,| 0) == 0|
|00000be0| 20 26 26 20 28 6c 6f 67 | 66 69 6c 65 20 3d 20 66 | && (log|file = f|
|00000bf0| 6f 70 65 6e 28 6c 66 6e | 61 6d 65 2c 20 22 61 22 |open(lfn|ame, "a"|
|00000c00| 29 29 20 21 3d 20 4e 55 | 4c 4c 29 20 7b 0a 21 20 |)) != NU|LL) {.! |
|00000c10| 23 69 66 20 64 65 66 69 | 6e 65 64 28 55 53 47 29 |#if defi|ned(USG)|
|00000c20| 20 7c 7c 20 64 65 66 69 | 6e 65 64 28 42 53 44 34 | || defi|ned(BSD4|
|00000c30| 5f 32 29 0a 20 20 09 09 | 69 6e 74 20 66 6c 61 67 |_2). ..|int flag|
|00000c40| 73 3b 0a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |s;.*****|********|
|00000c50| 2a 2a 0a 2a 2a 2a 20 32 | 30 37 2c 32 30 39 20 2a |**.*** 2|07,209 *|
|00000c60| 2a 2a 2a 0a 20 20 0a 21 | 20 23 69 66 20 21 64 65 |***. .!| #if !de|
|00000c70| 66 69 6e 65 64 28 42 53 | 44 34 5f 32 29 20 26 26 |fined(BS|D4_2) &&|
|00000c80| 20 21 64 65 66 69 6e 65 | 64 28 42 53 44 34 5f 31 | !define|d(BSD4_1|
|00000c90| 43 29 0a 20 20 72 65 6e | 61 6d 65 28 66 72 6f 6d |C). ren|ame(from|
|00000ca0| 2c 20 74 6f 29 0a 2d 2d | 2d 20 32 31 33 2c 32 31 |, to).--|- 213,21|
|00000cb0| 35 20 2d 2d 2d 2d 0a 20 | 20 0a 21 20 23 69 66 20 |5 ----. | .! #if |
|00000cc0| 21 64 65 66 69 6e 65 64 | 28 42 53 44 34 5f 32 29 |!defined|(BSD4_2)|
|00000cd0| 0a 20 20 72 65 6e 61 6d | 65 28 66 72 6f 6d 2c 20 |. renam|e(from, |
|00000ce0| 74 6f 29 0a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |to).****|********|
|00000cf0| 2a 2a 2a 0a 2a 2a 2a 20 | 32 31 38 2c 32 31 39 20 |***.*** |218,219 |
|00000d00| 2a 2a 2a 2a 0a 20 20 7d | 0a 21 20 23 65 6e 64 69 |****. }|.! #endi|
|00000d10| 66 20 2f 2a 20 21 42 53 | 44 34 5f 32 20 26 26 20 |f /* !BS|D4_2 && |
|00000d20| 21 42 53 44 34 5f 31 43 | 20 2a 2f 0a 2d 2d 2d 20 |!BSD4_1C| */.--- |
|00000d30| 32 32 34 2c 32 32 35 20 | 2d 2d 2d 2d 0a 20 20 7d |224,225 |----. }|
|00000d40| 0a 21 20 23 65 6e 64 69 | 66 20 2f 2a 20 21 42 53 |.! #endi|f /* !BS|
|00000d50| 44 34 5f 32 20 2a 2f 0a | 0a 49 6e 64 65 78 3a 20 |D4_2 */.|.Index: |
|00000d60| 63 6f 6e 74 72 6f 6c 2e | 63 0a 50 72 65 72 65 71 |control.|c.Prereq|
|00000d70| 3a 20 32 2e 35 34 0a 2a | 2a 2a 20 2e 64 2f 63 6f |: 2.54.*|** .d/co|
|00000d80| 6e 74 72 6f 6c 2e 63 09 | 57 65 64 20 4f 63 74 20 |ntrol.c.|Wed Oct |
|00000d90| 20 37 20 31 36 3a 34 39 | 3a 35 34 20 31 39 38 37 | 7 16:49|:54 1987|
|00000da0| 0a 2d 2d 2d 20 63 6f 6e | 74 72 6f 6c 2e 63 09 57 |.--- con|trol.c.W|
|00000db0| 65 64 20 4f 63 74 20 20 | 37 20 31 38 3a 34 38 3a |ed Oct |7 18:48:|
|00000dc0| 35 36 20 31 39 38 37 0a | 2a 2a 2a 2a 2a 2a 2a 2a |56 1987.|********|
|00000dd0| 2a 2a 2a 2a 2a 2a 2a 0a | 2a 2a 2a 20 32 31 2c 32 |*******.|*** 21,2|
|00000de0| 33 20 2a 2a 2a 2a 0a 20 | 20 23 69 66 64 65 66 20 |3 ****. | #ifdef |
|00000df0| 53 43 43 53 49 44 0a 21 | 20 73 74 61 74 69 63 20 |SCCSID.!| static |
|00000e00| 63 68 61 72 09 2a 53 63 | 63 73 49 64 20 3d 20 22 |char.*Sc|csId = "|
|00000e10| 40 28 23 29 63 6f 6e 74 | 72 6f 6c 2e 63 09 32 2e |@(#)cont|rol.c.2.|
|00000e20| 35 34 09 34 2f 31 30 2f | 38 37 22 3b 0a 20 20 23 |54.4/10/|87";. #|
|00000e30| 65 6e 64 69 66 20 2f 2a | 20 53 43 43 53 49 44 20 |endif /*| SCCSID |
|00000e40| 2a 2f 0a 2d 2d 2d 20 32 | 31 2c 32 33 20 2d 2d 2d |*/.--- 2|1,23 ---|
|00000e50| 2d 0a 20 20 23 69 66 64 | 65 66 20 53 43 43 53 49 |-. #ifd|ef SCCSI|
|00000e60| 44 0a 21 20 73 74 61 74 | 69 63 20 63 68 61 72 09 |D.! stat|ic char.|
|00000e70| 2a 53 63 63 73 49 64 20 | 3d 20 22 40 28 23 29 63 |*SccsId |= "@(#)c|
|00000e80| 6f 6e 74 72 6f 6c 2e 63 | 09 32 2e 35 35 09 31 30 |ontrol.c|.2.55.10|
|00000e90| 2f 37 2f 38 37 22 3b 0a | 20 20 23 65 6e 64 69 66 |/7/87";.| #endif|
|00000ea0| 20 2f 2a 20 53 43 43 53 | 49 44 20 2a 2f 0a 2a 2a | /* SCCS|ID */.**|
|00000eb0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0a 2a 2a |********|*****.**|
|00000ec0| 2a 20 33 30 36 2c 33 30 | 38 20 2a 2a 2a 2a 0a 20 |* 306,30|8 ****. |
|00000ed0| 20 09 69 66 20 28 63 70 | 20 3d 3d 20 4e 55 4c 4c | .if (cp| == NULL|
|00000ee0| 29 20 7b 0a 21 20 09 09 | 6c 6f 67 65 72 72 28 22 |) {.! ..|logerr("|
|00000ef0| 53 79 73 74 65 6d 20 25 | 73 20 77 61 6e 74 73 20 |System %|s wants |
|00000f00| 75 6e 61 76 61 69 6c 61 | 62 6c 65 20 61 72 74 69 |unavaila|ble arti|
|00000f10| 63 6c 65 20 25 73 2e 22 | 2c 0a 20 20 23 69 66 64 |cle %s."|,. #ifd|
|00000f20| 65 66 20 4d 55 4c 54 49 | 43 41 53 54 0a 2d 2d 2d |ef MULTI|CAST.---|
|00000f30| 20 33 30 36 2c 33 30 38 | 20 2d 2d 2d 2d 0a 20 20 | 306,308| ----. |
|00000f40| 09 69 66 20 28 63 70 20 | 3d 3d 20 4e 55 4c 4c 29 |.if (cp |== NULL)|
|00000f50| 20 7b 0a 21 20 09 09 6c | 6f 67 28 22 53 79 73 74 | {.! ..l|og("Syst|
|00000f60| 65 6d 20 25 73 20 77 61 | 6e 74 73 20 75 6e 61 76 |em %s wa|nts unav|
|00000f70| 61 69 6c 61 62 6c 65 20 | 61 72 74 69 63 6c 65 20 |ailable |article |
|00000f80| 25 73 2e 22 2c 0a 20 20 | 23 69 66 64 65 66 20 4d |%s.",. |#ifdef M|
|00000f90| 55 4c 54 49 43 41 53 54 | 0a 2a 2a 2a 2a 2a 2a 2a |ULTICAST|.*******|
|00000fa0| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 2a 2a 2a 20 33 37 35 |********|.*** 375|
|00000fb0| 2c 33 37 37 20 2a 2a 2a | 2a 0a 20 20 09 09 69 66 |,377 ***|*. ..if|
|00000fc0| 20 28 2a 2d 2d 71 20 3d | 3d 20 27 5c 30 27 20 26 | (*--q =|= '\0' &|
|00000fd0| 26 20 2a 2d 2d 70 20 3d | 3d 20 27 20 27 29 20 7b |& *--p =|= ' ') {|
|00000fe0| 0a 2d 20 09 09 09 69 6e | 74 20 6d 6f 64 69 66 69 |.- ...in|t modifi|
|00000ff0| 65 64 20 3d 20 30 3b 0a | 20 20 09 09 09 2f 2a 20 |ed = 0;.| .../* |
|00001000| 4e 6f 77 20 63 68 65 63 | 6b 20 69 66 20 69 74 27 |Now chec|k if it'|
|00001010| 73 20 63 6f 72 72 65 63 | 74 6c 79 20 6d 6f 64 65 |s correc|tly mode|
|00001020| 72 61 74 65 64 2f 75 6e | 6d 6f 64 65 72 61 74 65 |rated/un|moderate|
|00001030| 64 20 2a 2f 0a 2d 2d 2d | 20 33 37 35 2c 33 37 36 |d */.---| 375,376|
|00001040| 20 2d 2d 2d 2d 0a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a | ----.**|********|
|00001050| 2a 2a 2a 2a 2a 0a 2a 2a | 2a 20 33 38 35 2c 33 39 |*****.**|* 385,39|
|00001060| 35 20 2a 2a 2a 2a 0a 20 | 20 09 09 09 09 7d 0a 2d |5 ****. | ....}.-|
|00001070| 20 23 20 69 66 64 65 66 | 20 4e 4f 4e 45 57 47 52 | # ifdef| NONEWGR|
|00001080| 4f 55 50 53 0a 2d 20 09 | 09 09 09 69 66 28 63 61 |OUPS.- .|...if(ca|
|00001090| 6e 5f 63 68 61 6e 67 65 | 29 20 7b 0a 2d 20 09 09 |n_change|) {.- ..|
|000010a0| 09 09 09 2a 70 20 3d 20 | 27 6d 27 3b 0a 2d 20 09 |...*p = |'m';.- .|
|000010b0| 09 09 09 09 6d 6f 64 69 | 66 69 65 64 20 3d 20 31 |....modi|fied = 1|
|000010c0| 3b 0a 2d 20 09 09 09 09 | 7d 0a 2d 20 23 20 65 6c |;.- ....|}.- # el|
|000010d0| 73 65 20 2f 2a 20 21 20 | 4e 4f 4e 45 57 47 52 4f |se /* ! |NONEWGRO|
|000010e0| 55 50 53 20 2a 2f 0a 20 | 20 09 09 09 09 2a 70 20 |UPS */. | ....*p |
|000010f0| 3d 20 27 6d 27 3b 0a 2d | 20 09 09 09 09 6d 6f 64 |= 'm';.-| ....mod|
|00001100| 69 66 69 65 64 20 3d 20 | 31 3b 0a 2d 20 23 65 6e |ified = |1;.- #en|
|00001110| 64 69 66 20 2f 2a 20 4e | 4f 4e 45 57 47 52 4f 55 |dif /* N|ONEWGROU|
|00001120| 50 53 20 2a 2f 0a 20 20 | 09 09 09 7d 20 65 6c 73 |PS */. |...} els|
|00001130| 65 20 7b 0a 2d 2d 2d 20 | 33 38 34 2c 33 38 36 20 |e {.--- |384,386 |
|00001140| 2d 2d 2d 2d 0a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |----.***|********|
|00001150| 2a 2a 2a 2a 0a 2a 2a 2a | 20 33 39 39 2c 34 30 39 |****.***| 399,409|
|00001160| 20 2a 2a 2a 2a 0a 20 20 | 09 09 09 09 7d 0a 2d 20 | ****. |....}.- |
|00001170| 23 20 69 66 64 65 66 20 | 4e 4f 4e 45 57 47 52 4f |# ifdef |NONEWGRO|
|00001180| 55 50 53 0a 2d 20 09 09 | 09 09 69 66 28 63 61 6e |UPS.- ..|..if(can|
|00001190| 5f 63 68 61 6e 67 65 29 | 20 20 7b 0a 2d 20 09 09 |_change)| {.- ..|
|000011a0| 09 09 09 2a 70 20 3d 20 | 27 79 27 3b 0a 2d 20 09 |...*p = |'y';.- .|
|000011b0| 09 09 09 09 6d 6f 64 69 | 66 69 65 64 20 3d 20 31 |....modi|fied = 1|
|000011c0| 3b 0a 2d 20 09 09 09 09 | 7d 0a 2d 20 23 20 65 6c |;.- ....|}.- # el|
|000011d0| 73 65 20 2f 2a 20 21 20 | 4e 4f 4e 45 57 47 52 4f |se /* ! |NONEWGRO|
|000011e0| 55 50 53 20 2a 2f 0a 20 | 20 09 09 09 09 2a 70 20 |UPS */. | ....*p |
|000011f0| 3d 20 27 79 27 3b 0a 2d | 20 09 09 09 09 6d 6f 64 |= 'y';.-| ....mod|
|00001200| 69 66 69 65 64 20 3d 20 | 31 3b 0a 2d 20 23 20 65 |ified = |1;.- # e|
|00001210| 6e 64 69 66 20 2f 2a 20 | 4e 4f 4e 45 57 47 52 4f |ndif /* |NONEWGRO|
|00001220| 55 50 53 20 2a 2f 0a 20 | 20 09 09 09 7d 0a 2d 2d |UPS */. | ...}.--|
|00001230| 2d 20 33 39 30 2c 33 39 | 32 20 2d 2d 2d 2d 0a 2a |- 390,39|2 ----.*|
|00001240| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0a 2a |********|******.*|
|00001250| 2a 2a 20 34 31 31 2c 34 | 31 33 20 2a 2a 2a 2a 0a |** 411,4|13 ****.|
|00001260| 20 20 09 09 09 28 76 6f | 69 64 29 20 73 70 72 69 | ...(vo|id) spri|
|00001270| 6e 74 66 28 73 75 62 6a | 6c 69 6e 65 2c 0a 21 20 |ntf(subj|line,.! |
|00001280| 09 09 09 22 4e 65 77 73 | 67 72 6f 75 70 20 25 73 |..."News|group %s|
|00001290| 20 63 68 61 6e 67 65 20 | 66 72 6f 6d 20 25 73 6d | change |from %sm|
|000012a0| 6f 64 65 72 61 74 65 64 | 20 74 6f 20 25 73 6d 6f |oderated| to %smo|
|000012b0| 64 65 72 61 74 65 64 22 | 2c 0a 20 20 09 09 09 09 |derated"|,. ....|
|000012c0| 61 72 67 76 5b 31 5d 2c | 20 2a 70 3d 3d 27 79 27 |argv[1],| *p=='y'|
|000012d0| 20 3f 20 22 22 20 3a 20 | 22 75 6e 22 2c 0a 2d 2d | ? "" : |"un",.--|
|000012e0| 2d 20 33 39 34 2c 33 39 | 36 20 2d 2d 2d 2d 0a 20 |- 394,39|6 ----. |
|000012f0| 20 09 09 09 28 76 6f 69 | 64 29 20 73 70 72 69 6e | ...(voi|d) sprin|
|00001300| 74 66 28 73 75 62 6a 6c | 69 6e 65 2c 0a 21 20 09 |tf(subjl|ine,.! .|
|00001310| 09 09 22 4e 65 77 73 67 | 72 6f 75 70 20 25 73 20 |.."Newsg|roup %s |
|00001320| 63 68 61 6e 67 65 64 20 | 66 72 6f 6d 20 25 73 6d |changed |from %sm|
|00001330| 6f 64 65 72 61 74 65 64 | 20 74 6f 20 25 73 6d 6f |oderated| to %smo|
|00001340| 64 65 72 61 74 65 64 22 | 2c 0a 20 20 09 09 09 09 |derated"|,. ....|
|00001350| 61 72 67 76 5b 31 5d 2c | 20 2a 70 3d 3d 27 79 27 |argv[1],| *p=='y'|
|00001360| 20 3f 20 22 22 20 3a 20 | 22 75 6e 22 2c 0a 2a 2a | ? "" : |"un",.**|
|00001370| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0a 2a 2a |********|*****.**|
|00001380| 2a 20 34 31 36 2c 34 31 | 38 20 2a 2a 2a 2a 0a 20 |* 416,41|8 ****. |
|00001390| 20 09 09 09 69 66 20 28 | 66 64 20 21 3d 20 4e 55 | ...if (|fd != NU|
|000013a0| 4c 4c 29 20 7b 0a 21 20 | 09 09 09 09 69 66 28 6d |LL) {.! |....if(m|
|000013b0| 6f 64 69 66 69 65 64 29 | 0a 20 20 09 09 09 09 09 |odified)|. .....|
|000013c0| 66 70 72 69 6e 74 66 28 | 66 64 2c 0a 2d 2d 2d 20 |fprintf(|fd,.--- |
|000013d0| 33 39 39 2c 34 30 31 20 | 2d 2d 2d 2d 0a 20 20 09 |399,401 |----. .|
|000013e0| 09 09 69 66 20 28 66 64 | 20 21 3d 20 4e 55 4c 4c |..if (fd| != NULL|
|000013f0| 29 20 7b 0a 21 20 09 09 | 09 09 69 66 28 63 61 6e |) {.! ..|..if(can|
|00001400| 5f 63 68 61 6e 67 65 29 | 0a 20 20 09 09 09 09 09 |_change)|. .....|
|00001410| 66 70 72 69 6e 74 66 28 | 66 64 2c 0a 2a 2a 2a 2a |fprintf(|fd,.****|
|00001420| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 2a 2a 20 |********|***.*** |
|00001430| 34 33 33 2c 34 33 36 20 | 2a 2a 2a 2a 0a 20 20 09 |433,436 |****. .|
|00001440| 09 09 09 09 66 70 72 69 | 6e 74 66 28 66 64 2c 0a |....fpri|ntf(fd,.|
|00001450| 21 20 09 09 09 09 22 25 | 73 2f 69 6e 65 77 73 20 |! ...."%|s/inews |
|00001460| 2d 64 20 25 73 20 2d 43 | 20 25 73 20 6d 6f 64 65 |-d %s -C| %s mode|
|00001470| 72 61 74 65 64 5c 6e 22 | 2c 0a 21 20 09 09 09 09 |rated\n"|,.! ....|
|00001480| 09 09 4c 49 42 2c 20 4f | 52 47 44 49 53 54 52 49 |..LIB, O|RGDISTRI|
|00001490| 42 2c 20 61 72 67 76 5b | 31 5d 29 3b 0a 20 20 23 |B, argv[|1]);. #|
|000014a0| 65 6c 73 65 20 2f 2a 20 | 21 4f 52 47 44 49 53 54 |else /* |!ORGDIST|
|000014b0| 52 49 42 20 2a 2f 0a 2d | 2d 2d 20 34 31 36 2c 34 |RIB */.-|-- 416,4|
|000014c0| 32 30 20 2d 2d 2d 2d 0a | 20 20 09 09 09 09 09 66 |20 ----.| .....f|
|000014d0| 70 72 69 6e 74 66 28 66 | 64 2c 0a 21 20 09 09 09 |printf(f|d,.! ...|
|000014e0| 09 22 25 73 2f 69 6e 65 | 77 73 20 2d 64 20 25 73 |."%s/ine|ws -d %s|
|000014f0| 20 2d 43 20 25 73 25 73 | 5c 6e 22 2c 0a 21 20 09 | -C %s%s|\n",.! .|
|00001500| 09 09 09 09 09 4c 49 42 | 2c 20 4f 52 47 44 49 53 |.....LIB|, ORGDIS|
|00001510| 54 52 49 42 2c 20 61 72 | 67 76 5b 31 5d 2c 0a 21 |TRIB, ar|gv[1],.!|
|00001520| 20 09 09 09 09 09 09 2a | 70 3d 3d 27 79 27 20 3f | ......*|p=='y' ?|
|00001530| 20 22 22 20 3a 20 22 20 | 6d 6f 64 65 72 61 74 65 | "" : " |moderate|
|00001540| 64 22 29 3b 0a 20 20 23 | 65 6c 73 65 20 2f 2a 20 |d");. #|else /* |
|00001550| 21 4f 52 47 44 49 53 54 | 52 49 42 20 2a 2f 0a 2a |!ORGDIST|RIB */.*|
|00001560| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0a 2a |********|******.*|
|00001570| 2a 2a 20 34 33 38 2c 34 | 34 31 20 2a 2a 2a 2a 0a |** 438,4|41 ****.|
|00001580| 20 20 22 59 6f 75 20 63 | 61 6e 20 61 63 63 6f 6d | "You c|an accom|
|00001590| 70 6c 69 73 68 20 74 68 | 69 73 20 62 79 20 72 65 |plish th|is by re|
|000015a0| 2d 63 72 65 61 74 69 6e | 67 20 74 68 65 20 6e 65 |-creatin|g the ne|
|000015b0| 77 73 67 72 6f 75 70 20 | 62 79 20 65 78 65 63 75 |wsgroup |by execu|
|000015c0| 74 69 6e 67 20 74 68 65 | 20 63 6f 6d 6d 61 6e 64 |ting the| command|
|000015d0| 3a 5c 6e 22 29 3b 0a 21 | 20 09 09 09 09 09 66 70 |:\n");.!| .....fp|
|000015e0| 72 69 6e 74 66 28 66 64 | 2c 20 22 25 73 2f 69 6e |rintf(fd|, "%s/in|
|000015f0| 65 77 73 20 2d 43 20 25 | 73 20 6d 6f 64 65 72 61 |ews -C %|s modera|
|00001600| 74 65 64 5c 6e 22 2c 0a | 21 20 09 09 09 09 09 09 |ted\n",.|! ......|
|00001610| 4c 49 42 2c 20 61 72 67 | 76 5b 31 5d 29 3b 0a 20 |LIB, arg|v[1]);. |
|00001620| 20 23 65 6e 64 69 66 20 | 2f 2a 20 21 4f 52 47 44 | #endif |/* !ORGD|
|00001630| 49 53 54 52 49 42 20 2a | 2f 0a 2d 2d 2d 20 34 32 |ISTRIB *|/.--- 42|
|00001640| 32 2c 34 32 36 20 2d 2d | 2d 2d 0a 20 20 22 59 6f |2,426 --|--. "Yo|
|00001650| 75 20 63 61 6e 20 61 63 | 63 6f 6d 70 6c 69 73 68 |u can ac|complish|
|00001660| 20 74 68 69 73 20 62 79 | 20 72 65 2d 63 72 65 61 | this by| re-crea|
|00001670| 74 69 6e 67 20 74 68 65 | 20 6e 65 77 73 67 72 6f |ting the| newsgro|
|00001680| 75 70 20 62 79 20 65 78 | 65 63 75 74 69 6e 67 20 |up by ex|ecuting |
|00001690| 74 68 65 20 63 6f 6d 6d | 61 6e 64 3a 5c 6e 22 29 |the comm|and:\n")|
|000016a0| 3b 0a 21 20 09 09 09 09 | 09 66 70 72 69 6e 74 66 |;.! ....|.fprintf|
|000016b0| 28 66 64 2c 20 22 25 73 | 2f 69 6e 65 77 73 20 2d |(fd, "%s|/inews -|
|000016c0| 43 20 25 73 25 73 5c 6e | 22 2c 0a 21 20 09 09 09 |C %s%s\n|",.! ...|
|000016d0| 09 09 09 4c 49 42 2c 20 | 61 72 67 76 5b 31 5d 2c |...LIB, |argv[1],|
|000016e0| 0a 21 20 09 09 09 09 09 | 09 2a 70 3d 3d 27 79 27 |.! .....|.*p=='y'|
|000016f0| 20 3f 20 22 22 20 3a 20 | 22 20 6d 6f 64 65 72 61 | ? "" : |" modera|
|00001700| 74 65 64 22 29 3b 0a 20 | 20 23 65 6e 64 69 66 20 |ted");. | #endif |
|00001710| 2f 2a 20 21 4f 52 47 44 | 49 53 54 52 49 42 20 2a |/* !ORGD|ISTRIB *|
|00001720| 2f 0a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |/.******|********|
|00001730| 2a 0a 2a 2a 2a 20 35 30 | 34 2c 35 30 37 20 2a 2a |*.*** 50|4,507 **|
|00001740| 2a 2a 0a 20 20 09 09 09 | 66 70 72 69 6e 74 66 28 |**. ...|fprintf(|
|00001750| 66 64 2c 20 0a 21 20 09 | 09 22 41 20 6e 65 77 20 |fd, .! .|."A new |
|00001760| 6e 65 77 73 67 72 6f 75 | 70 20 63 61 6c 6c 65 64 |newsgrou|p called|
|00001770| 20 27 25 73 27 20 68 61 | 73 20 62 65 65 6e 20 63 | '%s' ha|s been c|
|00001780| 72 65 61 74 65 64 20 62 | 79 20 25 73 2e 5c 6e 22 |reated b|y %s.\n"|
|00001790| 2c 0a 21 20 09 09 09 09 | 09 09 09 61 72 67 76 5b |,.! ....|...argv[|
|000017a0| 31 5d 2c 20 68 65 61 64 | 65 72 2e 70 61 74 68 29 |1], head|er.path)|
|000017b0| 3b 0a 20 20 09 09 65 6c | 73 65 20 7b 0a 2d 2d 2d |;. ..el|se {.---|
|000017c0| 20 34 38 39 2c 34 39 33 | 20 2d 2d 2d 2d 0a 20 20 | 489,493| ----. |
|000017d0| 09 09 09 66 70 72 69 6e | 74 66 28 66 64 2c 20 0a |...fprin|tf(fd, .|
|000017e0| 21 20 09 09 22 41 20 6e | 65 77 20 25 73 6e 65 77 |! .."A n|ew %snew|
|000017f0| 73 67 72 6f 75 70 20 63 | 61 6c 6c 65 64 20 27 25 |sgroup c|alled '%|
|00001800| 73 27 20 68 61 73 20 62 | 65 65 6e 20 63 72 65 61 |s' has b|een crea|
|00001810| 74 65 64 20 62 79 20 25 | 73 2e 5c 6e 22 2c 0a 21 |ted by %|s.\n",.!|
|00001820| 20 09 09 09 09 61 72 67 | 63 20 3e 20 32 20 3f 20 | ....arg|c > 2 ? |
|00001830| 22 6d 6f 64 65 72 61 74 | 65 64 20 22 20 3a 20 22 |"moderat|ed " : "|
|00001840| 22 2c 20 61 72 67 76 5b | 31 5d 2c 0a 21 20 09 09 |", argv[|1],.! ..|
|00001850| 09 09 68 65 61 64 65 72 | 2e 70 61 74 68 29 3b 0a |..header|.path);.|
|00001860| 20 20 09 09 65 6c 73 65 | 20 7b 0a 2a 2a 2a 2a 2a | ..else| {.*****|
|00001870| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0a 2a 2a 2a 20 35 |********|**.*** 5|
|00001880| 30 38 2c 35 31 31 20 2a | 2a 2a 2a 0a 20 20 09 09 |08,511 *|***. ..|
|00001890| 09 66 70 72 69 6e 74 66 | 28 66 64 2c 20 0a 21 20 |.fprintf|(fd, .! |
|000018a0| 09 09 22 25 73 20 72 65 | 71 75 65 73 74 65 64 20 |.."%s re|quested |
|000018b0| 74 68 61 74 20 61 20 6e | 65 77 20 6e 65 77 73 67 |that a n|ew newsg|
|000018c0| 72 6f 75 70 20 63 61 6c | 6c 65 64 20 27 25 73 27 |roup cal|led '%s'|
|000018d0| 20 62 65 20 63 72 65 61 | 74 65 64 2e 5c 6e 22 2c | be crea|ted.\n",|
|000018e0| 0a 21 20 09 09 09 68 65 | 61 64 65 72 2e 70 61 74 |.! ...he|ader.pat|
|000018f0| 68 2c 20 61 72 67 76 5b | 31 5d 29 3b 0a 20 20 09 |h, argv[|1]);. .|
|00001900| 09 09 66 70 72 69 6e 74 | 66 28 66 64 2c 22 49 74 |..fprint|f(fd,"It|
|00001910| 20 77 61 73 20 61 70 70 | 72 6f 76 65 64 20 62 79 | was app|roved by|
|00001920| 20 25 73 5c 6e 5c 6e 22 | 2c 68 65 61 64 65 72 2e | %s\n\n"|,header.|
|00001930| 61 70 70 72 6f 76 65 64 | 29 3b 0a 2d 2d 2d 20 34 |approved|);.--- 4|
|00001940| 39 34 2c 34 39 37 20 2d | 2d 2d 2d 0a 20 20 09 09 |94,497 -|---. ..|
|00001950| 09 66 70 72 69 6e 74 66 | 28 66 64 2c 20 0a 21 20 |.fprintf|(fd, .! |
|00001960| 09 09 22 25 73 20 72 65 | 71 75 65 73 74 65 64 20 |.."%s re|quested |
|00001970| 74 68 61 74 20 61 20 6e | 65 77 20 25 73 6e 65 77 |that a n|ew %snew|
|00001980| 73 67 72 6f 75 70 20 63 | 61 6c 6c 65 64 20 27 25 |sgroup c|alled '%|
|00001990| 73 27 20 62 65 20 63 72 | 65 61 74 65 64 2e 5c 6e |s' be cr|eated.\n|
|000019a0| 22 2c 0a 21 20 09 09 09 | 68 65 61 64 65 72 2e 70 |",.! ...|header.p|
|000019b0| 61 74 68 2c 20 61 72 67 | 63 20 3e 20 32 20 3f 20 |ath, arg|c > 2 ? |
|000019c0| 22 6d 6f 64 65 72 61 74 | 65 64 20 22 20 3a 20 22 |"moderat|ed " : "|
|000019d0| 22 2c 20 61 72 67 76 5b | 31 5d 29 3b 0a 20 20 09 |", argv[|1]);. .|
|000019e0| 09 09 66 70 72 69 6e 74 | 66 28 66 64 2c 22 49 74 |..fprint|f(fd,"It|
|000019f0| 20 77 61 73 20 61 70 70 | 72 6f 76 65 64 20 62 79 | was app|roved by|
|00001a00| 20 25 73 5c 6e 5c 6e 22 | 2c 68 65 61 64 65 72 2e | %s\n\n"|,header.|
|00001a10| 61 70 70 72 6f 76 65 64 | 29 3b 0a 2a 2a 2a 2a 2a |approved|);.*****|
|00001a20| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0a 2a 2a 2a 20 35 |********|**.*** 5|
|00001a30| 39 37 2c 35 39 39 20 2a | 2a 2a 2a 0a 20 20 0a 21 |97,599 *|***. .!|
|00001a40| 20 09 09 69 66 20 28 70 | 69 64 20 3d 20 76 66 6f | ..if (p|id = vfo|
|00001a50| 72 6b 28 29 29 20 7b 0a | 20 20 09 09 09 73 74 61 |rk()) {.| ...sta|
|00001a60| 74 75 73 20 3d 20 66 77 | 61 69 74 28 70 69 64 29 |tus = fw|ait(pid)|
|00001a70| 3b 0a 2d 2d 2d 20 35 38 | 33 2c 35 38 35 20 2d 2d |;.--- 58|3,585 --|
|00001a80| 2d 2d 0a 20 20 0a 21 20 | 09 09 69 66 20 28 70 69 |--. .! |..if (pi|
|00001a90| 64 20 3d 20 66 6f 72 6b | 28 29 29 20 7b 0a 20 20 |d = fork|()) {. |
|00001aa0| 09 09 09 73 74 61 74 75 | 73 20 3d 20 66 77 61 69 |...statu|s = fwai|
|00001ab0| 74 28 70 69 64 29 3b 0a | 2a 2a 2a 2a 2a 2a 2a 2a |t(pid);.|********|
|00001ac0| 2a 2a 2a 2a 2a 2a 2a 0a | 2a 2a 2a 20 36 30 30 2c |*******.|*** 600,|
|00001ad0| 36 30 31 20 2a 2a 2a 2a | 0a 2d 2d 2d 20 35 38 36 |601 ****|.--- 586|
|00001ae0| 2c 35 39 31 20 2d 2d 2d | 2d 0a 20 20 09 09 7d 20 |,591 ---|-. ..} |
|00001af0| 65 6c 73 65 20 7b 0a 2b | 20 09 09 09 72 65 67 69 |else {.+| ...regi|
|00001b00| 73 74 65 72 20 69 6e 74 | 20 69 3b 0a 2b 20 09 09 |ster int| i;.+ ..|
|00001b10| 09 66 6f 72 20 28 69 20 | 3d 33 3b 20 69 3c 32 30 |.for (i |=3; i<20|
|00001b20| 3b 20 69 2b 2b 29 0a 2b | 20 09 09 09 09 69 66 20 |; i++).+| ....if |
|00001b30| 28 63 6c 6f 73 65 28 69 | 29 20 3c 20 30 29 0a 2b |(close(i|) < 0).+|
|00001b40| 20 09 09 09 09 09 62 72 | 65 61 6b 3b 0a 20 20 09 | .....br|eak;. .|
|00001b50| 09 09 28 76 6f 69 64 29 | 20 73 65 74 75 69 64 28 |..(void)| setuid(|
|00001b60| 64 75 69 64 29 3b 0a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |duid);.*|********|
|00001b70| 2a 2a 2a 2a 2a 2a 0a 2a | 2a 2a 20 36 37 34 2c 36 |******.*|** 674,6|
|00001b80| 37 36 20 2a 2a 2a 2a 0a | 20 20 09 09 09 6c 6f 67 |76 ****.| ...log|
|00001b90| 28 22 43 61 6e 27 74 20 | 63 61 6e 63 65 6c 20 25 |("Can't |cancel %|
|00001ba0| 73 3a 20 25 73 22 2c 20 | 6c 69 6e 65 2c 20 65 72 |s: %s", |line, er|
|00001bb0| 72 6d 73 67 28 65 72 72 | 6e 6f 29 29 3b 0a 21 20 |rmsg(err|no));.! |
|00001bc0| 09 09 09 72 65 74 75 72 | 6e 20 31 3b 0a 20 20 09 |...retur|n 1;. .|
|00001bd0| 09 7d 0a 2d 2d 2d 20 36 | 36 34 2c 36 36 36 20 2d |.}.--- 6|64,666 -|
|00001be0| 2d 2d 2d 0a 20 20 09 09 | 09 6c 6f 67 28 22 43 61 |---. ..|.log("Ca|
|00001bf0| 6e 27 74 20 63 61 6e 63 | 65 6c 20 25 73 3a 20 25 |n't canc|el %s: %|
|00001c00| 73 22 2c 20 6c 69 6e 65 | 2c 20 65 72 72 6d 73 67 |s", line|, errmsg|
|00001c10| 28 65 72 72 6e 6f 29 29 | 3b 0a 21 20 09 09 09 72 |(errno))|;.! ...r|
|00001c20| 65 74 75 72 6e 20 2d 31 | 3b 0a 20 20 09 09 7d 0a |eturn -1|;. ..}.|
|00001c30| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0a |********|*******.|
|00001c40| 2a 2a 2a 20 38 35 35 2c | 38 35 37 20 2a 2a 2a 2a |*** 855,|857 ****|
|00001c50| 0a 20 20 23 65 6e 64 69 | 66 20 2f 2a 20 4e 4f 54 |. #endi|f /* NOT|
|00001c60| 49 46 59 20 2a 2f 0a 21 | 20 09 09 69 66 20 28 73 |IFY */.!| ..if (s|
|00001c70| 65 6e 64 74 6f 20 3d 3d | 20 4e 55 4c 4c 20 7c 7c |endto ==| NULL |||
|00001c80| 20 2a 73 65 6e 64 74 6f | 20 3d 3d 20 4e 55 4c 4c | *sendto| == NULL|
|00001c90| 29 0a 20 20 09 09 09 72 | 65 74 75 72 6e 20 4e 55 |). ...r|eturn NU|
|00001ca0| 4c 4c 3b 0a 2d 2d 2d 20 | 38 34 35 2c 38 34 37 20 |LL;.--- |845,847 |
|00001cb0| 2d 2d 2d 2d 0a 20 20 23 | 65 6e 64 69 66 20 2f 2a |----. #|endif /*|
|00001cc0| 20 4e 4f 54 49 46 59 20 | 2a 2f 0a 21 20 09 09 69 | NOTIFY |*/.! ..i|
|00001cd0| 66 20 28 73 65 6e 64 74 | 6f 20 3d 3d 20 4e 55 4c |f (sendt|o == NUL|
|00001ce0| 4c 20 7c 7c 20 2a 73 65 | 6e 64 74 6f 20 3d 3d 20 |L || *se|ndto == |
|00001cf0| 27 5c 30 27 29 0a 20 20 | 09 09 09 72 65 74 75 72 |'\0'). |...retur|
|00001d00| 6e 20 4e 55 4c 4c 3b 0a | 2a 2a 2a 2a 2a 2a 2a 2a |n NULL;.|********|
|00001d10| 2a 2a 2a 2a 2a 2a 2a 0a | 2a 2a 2a 20 38 37 37 2c |*******.|*** 877,|
|00001d20| 38 37 39 20 2a 2a 2a 2a | 0a 20 20 23 65 6e 64 69 |879 ****|. #endi|
|00001d30| 66 20 2f 2a 20 4d 4d 44 | 46 20 2a 2f 0a 21 20 09 |f /* MMD|F */.! .|
|00001d40| 09 65 78 65 63 6c 28 22 | 2f 62 69 6e 2f 6d 61 69 |.execl("|/bin/mai|
|00001d50| 6c 22 2c 20 22 6d 61 69 | 6c 22 2c 20 73 65 6e 64 |l", "mai|l", send|
|00001d60| 74 6f 2c 20 28 63 68 61 | 72 20 2a 29 4e 55 4c 4c |to, (cha|r *)NULL|
|00001d70| 29 3b 0a 20 20 09 09 65 | 78 65 63 6c 28 22 2f 75 |);. ..e|xecl("/u|
|00001d80| 73 72 2f 62 69 6e 2f 6d | 61 69 6c 22 2c 20 22 6d |sr/bin/m|ail", "m|
|00001d90| 61 69 6c 22 2c 20 73 65 | 6e 64 74 6f 2c 20 28 63 |ail", se|ndto, (c|
|00001da0| 68 61 72 20 2a 29 4e 55 | 4c 4c 29 3b 0a 2d 2d 2d |har *)NU|LL);.---|
|00001db0| 20 38 36 37 2c 38 36 39 | 20 2d 2d 2d 2d 0a 20 20 | 867,869| ----. |
|00001dc0| 23 65 6e 64 69 66 20 2f | 2a 20 4d 4d 44 46 20 2a |#endif /|* MMDF *|
|00001dd0| 2f 0a 21 20 09 09 65 78 | 65 63 6c 28 22 2f 75 73 |/.! ..ex|ecl("/us|
|00001de0| 72 2f 62 69 6e 2f 6d 61 | 69 6c 78 22 2c 20 22 6d |r/bin/ma|ilx", "m|
|00001df0| 61 69 6c 22 2c 20 73 65 | 6e 64 74 6f 2c 20 28 63 |ail", se|ndto, (c|
|00001e00| 68 61 72 20 2a 29 4e 55 | 4c 4c 29 3b 0a 20 20 09 |har *)NU|LL);. .|
|00001e10| 09 65 78 65 63 6c 28 22 | 2f 75 73 72 2f 62 69 6e |.execl("|/usr/bin|
|00001e20| 2f 6d 61 69 6c 22 2c 20 | 22 6d 61 69 6c 22 2c 20 |/mail", |"mail", |
|00001e30| 73 65 6e 64 74 6f 2c 20 | 28 63 68 61 72 20 2a 29 |sendto, |(char *)|
|00001e40| 4e 55 4c 4c 29 3b 0a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |NULL);.*|********|
|00001e50| 2a 2a 2a 2a 2a 2a 0a 2a | 2a 2a 20 38 38 30 2c 38 |******.*|** 880,8|
|00001e60| 38 31 20 2a 2a 2a 2a 0a | 2d 2d 2d 20 38 37 30 2c |81 ****.|--- 870,|
|00001e70| 38 37 32 20 2d 2d 2d 2d | 0a 20 20 09 09 65 78 65 |872 ----|. ..exe|
|00001e80| 63 6c 28 22 2f 75 73 72 | 2f 75 63 62 2f 6d 61 69 |cl("/usr|/ucb/mai|
|00001e90| 6c 22 2c 20 22 6d 61 69 | 6c 22 2c 20 73 65 6e 64 |l", "mai|l", send|
|00001ea0| 74 6f 2c 20 28 63 68 61 | 72 20 2a 29 4e 55 4c 4c |to, (cha|r *)NULL|
|00001eb0| 29 3b 0a 2b 20 09 09 65 | 78 65 63 6c 28 22 2f 62 |);.+ ..e|xecl("/b|
|00001ec0| 69 6e 2f 6d 61 69 6c 22 | 2c 20 22 6d 61 69 6c 22 |in/mail"|, "mail"|
|00001ed0| 2c 20 73 65 6e 64 74 6f | 2c 20 28 63 68 61 72 20 |, sendto|, (char |
|00001ee0| 2a 29 4e 55 4c 4c 29 3b | 0a 20 20 09 09 5f 65 78 |*)NULL);|. .._ex|
|00001ef0| 69 74 28 31 29 3b 0a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |it(1);.*|********|
|00001f00| 2a 2a 2a 2a 2a 2a 0a 2a | 2a 2a 20 31 30 31 35 2c |******.*|** 1015,|
|00001f10| 31 30 31 37 20 2a 2a 2a | 2a 0a 20 20 09 7d 20 65 |1017 ***|*. .} e|
|00001f20| 6c 73 65 20 69 66 20 28 | 73 74 72 63 6d 70 28 6d |lse if (|strcmp(m|
|00001f30| 73 67 2c 20 22 64 65 6c | 73 75 62 22 29 20 3d 3d |sg, "del|sub") ==|
|00001f40| 20 30 29 20 7b 0a 21 20 | 09 09 69 66 20 28 21 70 | 0) {.! |..if (!p|
|00001f50| 72 65 66 69 78 28 68 65 | 61 64 65 72 2e 6e 62 75 |refix(he|ader.nbu|
|00001f60| 66 2c 20 22 74 6f 2e 22 | 29 29 20 7b 0a 20 20 09 |f, "to."|)) {. .|
|00001f70| 09 09 6c 6f 67 28 22 4d | 75 73 74 20 62 65 20 69 |..log("M|ust be i|
|00001f80| 6e 20 61 20 27 74 6f 2e | 73 79 73 74 65 6d 27 20 |n a 'to.|system' |
|00001f90| 6e 65 77 73 67 72 6f 75 | 70 2e 22 29 3b 0a 2d 2d |newsgrou|p.");.--|
|00001fa0| 2d 20 31 30 30 36 2c 31 | 30 30 38 20 2d 2d 2d 2d |- 1006,1|008 ----|
|00001fb0| 0a 20 20 09 7d 20 65 6c | 73 65 20 69 66 20 28 73 |. .} el|se if (s|
|00001fc0| 74 72 63 6d 70 28 6d 73 | 67 2c 20 22 64 65 6c 73 |trcmp(ms|g, "dels|
|00001fd0| 75 62 22 29 20 3d 3d 20 | 30 29 20 7b 0a 21 20 09 |ub") == |0) {.! .|
|00001fe0| 09 69 66 20 28 21 50 52 | 45 46 49 58 28 68 65 61 |.if (!PR|EFIX(hea|
|00001ff0| 64 65 72 2e 6e 62 75 66 | 2c 20 22 74 6f 2e 22 29 |der.nbuf|, "to.")|
|00002000| 29 20 7b 0a 20 20 09 09 | 09 6c 6f 67 28 22 4d 75 |) {. ..|.log("Mu|
|00002010| 73 74 20 62 65 20 69 6e | 20 61 20 27 74 6f 2e 73 |st be in| a 'to.s|
|00002020| 79 73 74 65 6d 27 20 6e | 65 77 73 67 72 6f 75 70 |ystem' n|ewsgroup|
|00002030| 2e 22 29 3b 0a 0a 49 6e | 64 65 78 3a 20 65 78 70 |.");..In|dex: exp|
|00002040| 69 72 65 2e 63 0a 50 72 | 65 72 65 71 3a 20 32 2e |ire.c.Pr|ereq: 2.|
|00002050| 35 33 0a 2a 2a 2a 20 2e | 64 2f 65 78 70 69 72 65 |53.*** .|d/expire|
|00002060| 2e 63 09 57 65 64 20 4f | 63 74 20 20 37 20 31 36 |.c.Wed O|ct 7 16|
|00002070| 3a 35 30 3a 34 31 20 31 | 39 38 37 0a 2d 2d 2d 20 |:50:41 1|987.--- |
|00002080| 65 78 70 69 72 65 2e 63 | 09 57 65 64 20 4f 63 74 |expire.c|.Wed Oct|
|00002090| 20 20 37 20 31 38 3a 34 | 38 3a 35 38 20 31 39 38 | 7 18:4|8:58 198|
|000020a0| 37 0a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |7.******|********|
|000020b0| 2a 0a 2a 2a 2a 20 31 39 | 2c 32 31 20 2a 2a 2a 2a |*.*** 19|,21 ****|
|000020c0| 0a 20 20 23 69 66 64 65 | 66 20 53 43 43 53 49 44 |. #ifde|f SCCSID|
|000020d0| 0a 21 20 73 74 61 74 69 | 63 20 63 68 61 72 09 2a |.! stati|c char.*|
|000020e0| 53 63 63 73 49 64 20 3d | 20 22 40 28 23 29 65 78 |SccsId =| "@(#)ex|
|000020f0| 70 69 72 65 2e 63 09 32 | 2e 35 33 09 34 2f 36 2f |pire.c.2|.53.4/6/|
|00002100| 38 37 22 3b 0a 20 20 23 | 65 6e 64 69 66 20 2f 2a |87";. #|endif /*|
|00002110| 20 53 43 43 53 49 44 20 | 2a 2f 0a 2d 2d 2d 20 31 | SCCSID |*/.--- 1|
|00002120| 39 2c 32 31 20 2d 2d 2d | 2d 0a 20 20 23 69 66 64 |9,21 ---|-. #ifd|
|00002130| 65 66 20 53 43 43 53 49 | 44 0a 21 20 73 74 61 74 |ef SCCSI|D.! stat|
|00002140| 69 63 20 63 68 61 72 09 | 2a 53 63 63 73 49 64 20 |ic char.|*SccsId |
|00002150| 3d 20 22 40 28 23 29 65 | 78 70 69 72 65 2e 63 09 |= "@(#)e|xpire.c.|
|00002160| 32 2e 35 34 09 31 30 2f | 37 2f 38 37 22 3b 0a 20 |2.54.10/|7/87";. |
|00002170| 20 23 65 6e 64 69 66 20 | 2f 2a 20 53 43 43 53 49 | #endif |/* SCCSI|
|00002180| 44 20 2a 2f 0a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |D */.***|********|
|00002190| 2a 2a 2a 2a 0a 2a 2a 2a | 20 32 34 2c 33 31 20 2a |****.***| 24,31 *|
|000021a0| 2a 2a 2a 0a 20 20 23 69 | 6e 63 6c 75 64 65 20 3c |***. #i|nclude <|
|000021b0| 65 72 72 6e 6f 2e 68 3e | 0a 21 20 23 69 66 20 64 |errno.h>|.! #if d|
|000021c0| 65 66 69 6e 65 64 28 42 | 53 44 34 5f 32 29 20 7c |efined(B|SD4_2) ||
|000021d0| 7c 20 64 65 66 69 6e 65 | 64 28 42 53 44 34 5f 31 || define|d(BSD4_1|
|000021e0| 43 29 0a 21 20 23 20 69 | 6e 63 6c 75 64 65 20 3c |C).! # i|nclude <|
|000021f0| 73 79 73 2f 64 69 72 2e | 68 3e 0a 20 20 23 20 69 |sys/dir.|h>. # i|
|00002200| 6e 63 6c 75 64 65 20 3c | 73 79 73 2f 66 69 6c 65 |nclude <|sys/file|
|00002210| 2e 68 3e 0a 21 20 23 65 | 6c 73 65 0a 21 20 23 20 |.h>.! #e|lse.! # |
|00002220| 69 6e 63 6c 75 64 65 20 | 22 6e 64 69 72 2e 68 22 |include |"ndir.h"|
|00002230| 0a 21 20 23 65 6e 64 69 | 66 0a 20 20 0a 2d 2d 2d |.! #endi|f. .---|
|00002240| 20 32 34 2c 32 39 20 2d | 2d 2d 2d 0a 20 20 23 69 | 24,29 -|---. #i|
|00002250| 6e 63 6c 75 64 65 20 3c | 65 72 72 6e 6f 2e 68 3e |nclude <|errno.h>|
|00002260| 0a 21 20 0a 21 20 23 69 | 66 64 65 66 20 42 53 44 |.! .! #i|fdef BSD|
|00002270| 34 5f 32 0a 20 20 23 20 | 69 6e 63 6c 75 64 65 20 |4_2. # |include |
|00002280| 3c 73 79 73 2f 66 69 6c | 65 2e 68 3e 0a 21 20 23 |<sys/fil|e.h>.! #|
|00002290| 65 6e 64 69 66 20 2f 2a | 20 42 53 44 34 5f 32 20 |endif /*| BSD4_2 |
|000022a0| 2a 2f 0a 20 20 0a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |*/. .**|********|
|000022b0| 2a 2a 2a 2a 2a 0a 2a 2a | 2a 20 37 38 2c 38 31 20 |*****.**|* 78,81 |
|000022c0| 2a 2a 2a 2a 0a 20 20 75 | 6e 73 69 67 6e 65 64 20 |****. u|nsigned |
|000022d0| 69 6e 74 20 6d 68 5f 73 | 69 7a 65 3b 0a 21 20 63 |int mh_s|ize;.! c|
|000022e0| 68 61 72 20 2a 63 61 6c | 6c 6f 63 28 29 3b 0a 21 |har *cal|loc();.!|
|000022f0| 20 63 68 61 72 20 2a 72 | 65 61 6c 6c 6f 63 28 29 | char *r|ealloc()|
|00002300| 3b 0a 20 20 73 74 72 75 | 63 74 20 74 6d 20 2a 67 |;. stru|ct tm *g|
|00002310| 6d 74 69 6d 65 28 29 3b | 0a 2d 2d 2d 20 37 36 2c |mtime();|.--- 76,|
|00002320| 37 38 20 2d 2d 2d 2d 0a | 20 20 75 6e 73 69 67 6e |78 ----.| unsign|
|00002330| 65 64 20 69 6e 74 20 6d | 68 5f 73 69 7a 65 3b 0a |ed int m|h_size;.|
|00002340| 21 20 65 78 74 65 72 6e | 20 63 68 61 72 20 2a 63 |! extern| char *c|
|00002350| 61 6c 6c 6f 63 28 29 2c | 20 2a 72 65 61 6c 6c 6f |alloc(),| *reallo|
|00002360| 63 28 29 3b 0a 20 20 73 | 74 72 75 63 74 20 74 6d |c();. s|truct tm|
|00002370| 20 2a 67 6d 74 69 6d 65 | 28 29 3b 0a 2a 2a 2a 2a | *gmtime|();.****|
|00002380| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 2a 2a 20 |********|***.*** |
|00002390| 38 32 2c 38 39 20 2a 2a | 2a 2a 0a 20 20 0a 21 20 |82,89 **|**. .! |
|000023a0| 23 69 66 64 65 66 20 44 | 42 4d 0a 21 20 74 79 70 |#ifdef D|BM.! typ|
|000023b0| 65 64 65 66 20 73 74 72 | 75 63 74 20 7b 0a 21 20 |edef str|uct {.! |
|000023c0| 09 63 68 61 72 20 2a 64 | 70 74 72 3b 0a 21 20 09 |.char *d|ptr;.! .|
|000023d0| 69 6e 74 20 64 73 69 7a | 65 3b 0a 21 20 7d 20 64 |int dsiz|e;.! } d|
|000023e0| 61 74 75 6d 3b 0a 21 20 | 23 65 6c 73 65 0a 20 20 |atum;.! |#else. |
|000023f0| 46 49 4c 45 20 2a 6e 65 | 78 74 68 69 73 74 66 69 |FILE *ne|xthistfi|
|00002400| 6c 65 28 29 3b 0a 2d 2d | 2d 20 37 39 2c 38 31 20 |le();.--|- 79,81 |
|00002410| 2d 2d 2d 2d 0a 20 20 0a | 21 20 23 69 66 6e 64 65 |----. .|! #ifnde|
|00002420| 66 20 44 42 4d 0a 20 20 | 46 49 4c 45 20 2a 6e 65 |f DBM. |FILE *ne|
|00002430| 78 74 68 69 73 74 66 69 | 6c 65 28 29 3b 0a 2a 2a |xthistfi|le();.**|
|00002440| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0a 2a 2a |********|*****.**|
|00002450| 2a 20 31 30 35 2c 31 30 | 37 20 2a 2a 2a 2a 0a 20 |* 105,10|7 ****. |
|00002460| 20 73 74 72 75 63 74 20 | 68 62 75 66 20 68 3b 0a | struct |hbuf h;.|
|00002470| 2d 20 69 6e 74 09 45 78 | 70 69 72 65 4c 6f 63 6b |- int.Ex|pireLock|
|00002480| 3b 0a 20 20 69 6e 74 09 | 72 6d 6c 6f 63 6b 28 29 |;. int.|rmlock()|
|00002490| 3b 0a 2d 2d 2d 20 39 37 | 2c 39 38 20 2d 2d 2d 2d |;.--- 97|,98 ----|
|000024a0| 0a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.*******|********|
|000024b0| 0a 2a 2a 2a 20 33 31 37 | 2c 33 31 39 20 2a 2a 2a |.*** 317|,319 ***|
|000024c0| 2a 0a 20 20 23 65 6e 64 | 69 66 20 2f 2a 20 50 52 |*. #end|if /* PR|
|000024d0| 4f 46 49 4c 49 4e 47 20 | 2a 2f 0a 21 20 23 69 66 |OFILING |*/.! #if|
|000024e0| 64 65 66 20 49 48 43 43 | 0a 20 20 09 2f 2a 61 66 |def IHCC|. ./*af|
|000024f0| 6c 69 6e 65 20 68 61 70 | 70 65 6e 73 20 74 6f 20 |line hap|pens to |
|00002500| 62 65 20 61 76 61 69 6c | 61 62 6c 65 20 2d 20 28 |be avail|able - (|
|00002510| 77 65 27 72 65 20 67 65 | 74 74 69 6e 67 20 6f 75 |we're ge|tting ou|
|00002520| 74 20 61 6e 79 77 61 79 | 29 2a 2f 0a 2d 2d 2d 20 |t anyway|)*/.--- |
|00002530| 33 30 38 2c 33 31 30 20 | 2d 2d 2d 2d 0a 20 20 23 |308,310 |----. #|
|00002540| 65 6e 64 69 66 20 2f 2a | 20 50 52 4f 46 49 4c 49 |endif /*| PROFILI|
|00002550| 4e 47 20 2a 2f 0a 21 20 | 23 69 66 64 65 66 20 4c |NG */.! |#ifdef L|
|00002560| 4f 47 44 49 52 0a 20 20 | 09 2f 2a 61 66 6c 69 6e |OGDIR. |./*aflin|
|00002570| 65 20 68 61 70 70 65 6e | 73 20 74 6f 20 62 65 20 |e happen|s to be |
|00002580| 61 76 61 69 6c 61 62 6c | 65 20 2d 20 28 77 65 27 |availabl|e - (we'|
|00002590| 72 65 20 67 65 74 74 69 | 6e 67 20 6f 75 74 20 61 |re getti|ng out a|
|000025a0| 6e 79 77 61 79 29 2a 2f | 0a 2a 2a 2a 2a 2a 2a 2a |nyway)*/|.*******|
|000025b0| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 2a 2a 2a 20 33 32 31 |********|.*** 321|
|000025c0| 2c 33 32 35 20 2a 2a 2a | 2a 0a 20 20 09 65 78 65 |,325 ***|*. .exe|
|000025d0| 63 6c 28 61 66 6c 69 6e | 65 2c 20 22 72 6e 65 77 |cl(aflin|e, "rnew|
|000025e0| 73 22 2c 20 22 2d 55 22 | 2c 20 28 63 68 61 72 20 |s", "-U"|, (char |
|000025f0| 2a 29 4e 55 4c 4c 29 3b | 0a 21 20 23 65 6c 73 65 |*)NULL);|.! #else|
|00002600| 20 2f 2a 20 21 20 49 48 | 43 43 20 2a 2f 0a 20 20 | /* ! IH|CC */. |
|00002610| 09 65 78 65 63 6c 28 52 | 4e 45 57 53 2c 20 22 72 |.execl(R|NEWS, "r|
|00002620| 6e 65 77 73 22 2c 20 22 | 2d 55 22 2c 20 28 63 68 |news", "|-U", (ch|
|00002630| 61 72 20 2a 29 4e 55 4c | 4c 29 3b 0a 21 20 23 65 |ar *)NUL|L);.! #e|
|00002640| 6e 64 69 66 20 2f 2a 20 | 21 20 49 48 43 43 20 2a |ndif /* |! IHCC *|
|00002650| 2f 0a 20 20 09 70 65 72 | 72 6f 72 28 52 4e 45 57 |/. .per|ror(RNEW|
|00002660| 53 29 3b 0a 2d 2d 2d 20 | 33 31 32 2c 33 31 36 20 |S);.--- |312,316 |
|00002670| 2d 2d 2d 2d 0a 20 20 09 | 65 78 65 63 6c 28 61 66 |----. .|execl(af|
|00002680| 6c 69 6e 65 2c 20 22 72 | 6e 65 77 73 22 2c 20 22 |line, "r|news", "|
|00002690| 2d 55 22 2c 20 28 63 68 | 61 72 20 2a 29 4e 55 4c |-U", (ch|ar *)NUL|
|000026a0| 4c 29 3b 0a 21 20 23 65 | 6c 73 65 20 2f 2a 20 21 |L);.! #e|lse /* !|
|000026b0| 20 4c 4f 47 44 49 52 20 | 2a 2f 0a 20 20 09 65 78 | LOGDIR |*/. .ex|
|000026c0| 65 63 6c 28 52 4e 45 57 | 53 2c 20 22 72 6e 65 77 |ecl(RNEW|S, "rnew|
|000026d0| 73 22 2c 20 22 2d 55 22 | 2c 20 28 63 68 61 72 20 |s", "-U"|, (char |
|000026e0| 2a 29 4e 55 4c 4c 29 3b | 0a 21 20 23 65 6e 64 69 |*)NULL);|.! #endi|
|000026f0| 66 20 2f 2a 20 21 20 4c | 4f 47 44 49 52 20 2a 2f |f /* ! L|OGDIR */|
|00002700| 0a 20 20 09 70 65 72 72 | 6f 72 28 52 4e 45 57 53 |. .perr|or(RNEWS|
|00002710| 29 3b 0a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |);.*****|********|
|00002720| 2a 2a 0a 2a 2a 2a 20 33 | 35 39 2c 33 36 31 20 2a |**.*** 3|59,361 *|
|00002730| 2a 2a 2a 0a 20 20 0a 21 | 20 09 09 09 28 76 6f 69 |***. .!| ...(voi|
|00002740| 64 29 20 73 70 72 69 6e | 74 66 28 61 66 6c 69 6e |d) sprin|tf(aflin|
|00002750| 65 2c 20 22 65 78 65 63 | 20 73 6f 72 74 20 2d 74 |e, "exec| sort -t|
|00002760| 5c 74 20 2b 31 2e 36 20 | 2d 32 20 2b 31 20 3e 25 |\t +1.6 |-2 +1 >%|
|00002770| 73 22 2c 20 4e 41 52 54 | 46 49 4c 45 29 3b 0a 20 |s", NART|FILE);. |
|00002780| 20 09 09 09 69 66 20 28 | 28 6e 68 66 64 20 3d 20 | ...if (|(nhfd = |
|00002790| 70 6f 70 65 6e 28 61 66 | 6c 69 6e 65 2c 20 22 77 |popen(af|line, "w|
|000027a0| 22 29 29 20 3d 3d 20 4e | 55 4c 4c 29 0a 2d 2d 2d |")) == N|ULL).---|
|000027b0| 20 33 35 30 2c 33 35 37 | 20 2d 2d 2d 2d 0a 20 20 | 350,357| ----. |
|000027c0| 0a 21 20 09 09 09 28 76 | 6f 69 64 29 20 73 70 72 |.! ...(v|oid) spr|
|000027d0| 69 6e 74 66 28 61 66 6c | 69 6e 65 2c 20 22 65 78 |intf(afl|ine, "ex|
|000027e0| 65 63 20 73 6f 72 74 20 | 2d 74 5c 74 20 2b 31 2e |ec sort |-t\t +1.|
|000027f0| 36 20 2d 32 20 2b 31 20 | 3e 25 73 22 2c 0a 21 20 |6 -2 +1 |>%s",.! |
|00002800| 23 69 66 64 65 66 20 44 | 42 4d 0a 21 20 09 09 09 |#ifdef D|BM.! ...|
|00002810| 4e 41 52 54 46 49 4c 45 | 29 3b 0a 21 20 23 65 6c |NARTFILE|);.! #el|
|00002820| 73 65 20 2f 2a 20 21 44 | 42 4d 20 2a 2f 0a 21 20 |se /* !D|BM */.! |
|00002830| 09 09 09 41 52 54 46 49 | 4c 45 29 3b 0a 21 20 23 |...ARTFI|LE);.! #|
|00002840| 65 6e 64 69 66 20 2f 2a | 20 21 44 42 4d 20 2a 2f |endif /*| !DBM */|
|00002850| 0a 20 20 09 09 09 69 66 | 20 28 28 6e 68 66 64 20 |. ...if| ((nhfd |
|00002860| 3d 20 70 6f 70 65 6e 28 | 61 66 6c 69 6e 65 2c 20 |= popen(|afline, |
|00002870| 22 77 22 29 29 20 3d 3d | 20 4e 55 4c 4c 29 0a 2a |"w")) ==| NULL).*|
|00002880| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0a 2a |********|******.*|
|00002890| 2a 2a 20 33 39 33 2c 33 | 39 35 20 2a 2a 2a 2a 0a |** 393,3|95 ****.|
|000028a0| 20 20 09 09 09 09 09 69 | 66 20 28 70 31 20 21 3d | .....i|f (p1 !=|
|000028b0| 20 4e 55 4c 4c 29 0a 21 | 20 09 09 09 09 09 09 2a | NULL).!| ......*|
|000028c0| 70 31 20 3d 20 4e 55 4c | 4c 3b 0a 20 20 09 09 09 |p1 = NUL|L;. ...|
|000028d0| 09 09 69 66 20 28 21 6e | 67 6d 61 74 63 68 28 6e |..if (!n|gmatch(n|
|000028e0| 62 75 66 2c 20 6e 67 70 | 61 74 29 29 0a 2d 2d 2d |buf, ngp|at)).---|
|000028f0| 20 33 38 39 2c 33 39 31 | 20 2d 2d 2d 2d 0a 20 20 | 389,391| ----. |
|00002900| 09 09 09 09 09 69 66 20 | 28 70 31 20 21 3d 20 4e |.....if |(p1 != N|
|00002910| 55 4c 4c 29 0a 21 20 09 | 09 09 09 09 09 2a 70 31 |ULL).! .|.....*p1|
|00002920| 20 3d 20 27 5c 30 27 3b | 0a 20 20 09 09 09 09 09 | = '\0';|. .....|
|00002930| 69 66 20 28 21 6e 67 6d | 61 74 63 68 28 6e 62 75 |if (!ngm|atch(nbu|
|00002940| 66 2c 20 6e 67 70 61 74 | 29 29 0a 2a 2a 2a 2a 2a |f, ngpat|)).*****|
|00002950| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0a 2a 2a 2a 20 34 |********|**.*** 4|
|00002960| 34 31 2c 34 34 32 20 2a | 2a 2a 2a 0a 2d 2d 2d 20 |41,442 *|***.--- |
|00002970| 34 33 37 2c 34 33 39 20 | 2d 2d 2d 2d 0a 20 20 09 |437,439 |----. .|
|00002980| 09 09 28 76 6f 69 64 29 | 20 73 74 72 63 70 79 28 |..(void)| strcpy(|
|00002990| 72 65 63 64 61 74 65 2c | 20 70 31 2b 31 29 3b 0a |recdate,| p1+1);.|
|000029a0| 2b 20 09 09 09 28 76 6f | 69 64 29 20 73 74 72 63 |+ ...(vo|id) strc|
|000029b0| 61 74 28 72 65 63 64 61 | 74 65 2c 20 22 20 47 4d |at(recda|te, " GM|
|000029c0| 54 22 29 3b 0a 20 20 09 | 09 09 72 65 63 74 69 6d |T");. .|..rectim|
|000029d0| 65 20 3d 20 63 67 74 64 | 61 74 65 28 72 65 63 64 |e = cgtd|ate(recd|
|000029e0| 61 74 65 29 3b 0a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |ate);.**|********|
|000029f0| 2a 2a 2a 2a 2a 0a 2a 2a | 2a 20 37 37 30 2c 37 37 |*****.**|* 770,77|
|00002a00| 32 20 2a 2a 2a 2a 0a 20 | 20 09 69 66 20 28 64 6f |2 ****. | .if (do|
|00002a10| 72 65 62 75 69 6c 64 20 | 7c 7c 20 21 6e 6f 68 69 |rebuild ||| !nohi|
|00002a20| 73 74 6f 72 79 29 20 7b | 0a 21 20 23 69 66 6e 64 |story) {|.! #ifnd|
|00002a30| 65 66 20 44 42 4d 0a 20 | 20 09 09 28 76 6f 69 64 |ef DBM. | ..(void|
|00002a40| 29 20 72 65 6e 61 6d 65 | 28 41 52 54 46 49 4c 45 |) rename|(ARTFILE|
|00002a50| 2c 20 4f 41 52 54 46 49 | 4c 45 29 3b 0a 2d 2d 2d |, OARTFI|LE);.---|
|00002a60| 20 37 36 37 2c 37 36 39 | 20 2d 2d 2d 2d 0a 20 20 | 767,769| ----. |
|00002a70| 09 69 66 20 28 64 6f 72 | 65 62 75 69 6c 64 20 7c |.if (dor|ebuild ||
|00002a80| 7c 20 21 6e 6f 68 69 73 | 74 6f 72 79 29 20 7b 0a || !nohis|tory) {.|
|00002a90| 21 20 23 69 66 64 65 66 | 20 44 42 4d 0a 20 20 09 |! #ifdef| DBM. .|
|00002aa0| 09 28 76 6f 69 64 29 20 | 72 65 6e 61 6d 65 28 41 |.(void) |rename(A|
|00002ab0| 52 54 46 49 4c 45 2c 20 | 4f 41 52 54 46 49 4c 45 |RTFILE, |OARTFILE|
|00002ac0| 29 3b 0a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |);.*****|********|
|00002ad0| 2a 2a 0a 2a 2a 2a 20 38 | 30 30 2c 38 30 32 20 2a |**.*** 8|00,802 *|
|00002ae0| 2a 2a 2a 0a 20 20 23 20 | 69 66 64 65 66 09 4c 4f |***. # |ifdef.LO|
|00002af0| 43 4b 46 0a 21 20 09 69 | 66 20 28 6c 6f 63 6b 66 |CKF.! .i|f (lockf|
|00002b00| 28 4c 6f 63 6b 46 64 2c | 20 46 5f 4c 4f 43 4b 2c |(LockFd,| F_LOCK,|
|00002b10| 20 30 29 20 3c 20 30 29 | 0a 20 20 23 20 65 6c 73 | 0) < 0)|. # els|
|00002b20| 65 09 2f 2a 20 42 53 44 | 34 5f 32 20 2a 2f 0a 2d |e./* BSD|4_2 */.-|
|00002b30| 2d 2d 20 37 39 37 2c 37 | 39 39 20 2d 2d 2d 2d 0a |-- 797,7|99 ----.|
|00002b40| 20 20 23 20 69 66 64 65 | 66 09 4c 4f 43 4b 46 0a | # ifde|f.LOCKF.|
|00002b50| 21 20 09 69 66 20 28 6c | 6f 63 6b 66 28 4c 6f 63 |! .if (l|ockf(Loc|
|00002b60| 6b 46 64 2c 20 46 5f 4c | 4f 43 4b 2c 20 30 4c 29 |kFd, F_L|OCK, 0L)|
|00002b70| 20 3c 20 30 29 0a 20 20 | 23 20 65 6c 73 65 09 2f | < 0). |# else./|
|00002b80| 2a 20 42 53 44 34 5f 32 | 20 2a 2f 0a 2a 2a 2a 2a |* BSD4_2| */.****|
|00002b90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 2a 2a 20 |********|***.*** |
|00002ba0| 38 30 39 2c 38 31 32 20 | 2a 2a 2a 2a 0a 20 20 09 |809,812 |****. .|
|00002bb0| 77 68 69 6c 65 20 28 4c | 49 4e 4b 28 41 43 54 49 |while (L|INK(ACTI|
|00002bc0| 56 45 2c 20 61 66 6c 69 | 6e 65 29 20 3c 20 30 20 |VE, afli|ne) < 0 |
|00002bd0| 26 26 20 65 72 72 6e 6f | 20 3d 3d 20 45 45 58 49 |&& errno| == EEXI|
|00002be0| 53 54 29 20 7b 0a 21 20 | 09 09 69 66 20 28 69 2b |ST) {.! |..if (i+|
|00002bf0| 2b 20 3e 20 35 29 0a 21 | 20 09 09 09 78 65 72 72 |+ > 5).!| ...xerr|
|00002c00| 6f 72 28 22 43 61 6e 27 | 74 20 67 65 74 20 6c 6f |or("Can'|t get lo|
|00002c10| 63 6b 20 66 6f 72 20 65 | 78 70 69 72 65 22 29 3b |ck for e|xpire");|
|00002c20| 0a 20 20 09 09 73 6c 65 | 65 70 28 69 2a 32 29 3b |. ..sle|ep(i*2);|
|00002c30| 0a 2d 2d 2d 20 38 30 36 | 2c 38 31 31 20 2d 2d 2d |.--- 806|,811 ---|
|00002c40| 2d 0a 20 20 09 77 68 69 | 6c 65 20 28 4c 49 4e 4b |-. .whi|le (LINK|
|00002c50| 28 41 43 54 49 56 45 2c | 20 61 66 6c 69 6e 65 29 |(ACTIVE,| afline)|
|00002c60| 20 3c 20 30 20 26 26 20 | 65 72 72 6e 6f 20 3d 3d | < 0 && |errno ==|
|00002c70| 20 45 45 58 49 53 54 29 | 20 7b 0a 21 20 09 09 69 | EEXIST)| {.! ..i|
|00002c80| 66 20 28 69 2b 2b 20 3e | 20 35 29 20 7b 0a 21 20 |f (i++ >| 5) {.! |
|00002c90| 09 09 09 65 72 72 6f 72 | 28 22 43 61 6e 27 74 20 |...error|("Can't |
|00002ca0| 67 65 74 20 6c 6f 63 6b | 20 66 6f 72 20 65 78 70 |get lock| for exp|
|00002cb0| 69 72 65 22 29 3b 0a 21 | 20 09 09 09 65 78 69 74 |ire");.!| ...exit|
|00002cc0| 28 31 29 3b 0a 21 20 09 | 09 7d 0a 20 20 09 09 73 |(1);.! .|.}. ..s|
|00002cd0| 6c 65 65 70 28 69 2a 32 | 29 3b 0a 2a 2a 2a 2a 2a |leep(i*2|);.*****|
|00002ce0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0a 2a 2a 2a 20 39 |********|**.*** 9|
|00002cf0| 33 34 2c 39 34 32 20 2a | 2a 2a 2a 0a 20 20 09 09 |34,942 *|***. ..|
|00002d00| 09 7d 0a 2d 20 09 09 09 | 69 66 20 28 70 20 3d 3d |.}.- ...|if (p ==|
|00002d10| 20 4e 55 4c 4c 29 20 7b | 0a 2d 20 09 09 09 09 6c | NULL) {|.- ....l|
|00002d20| 61 73 74 20 3d 20 31 3b | 0a 2d 20 09 09 09 09 66 |ast = 1;|.- ....f|
|00002d30| 6e 20 3d 20 64 69 72 6e | 61 6d 65 28 61 72 74 6c |n = dirn|ame(artl|
|00002d40| 69 73 74 29 3b 0a 2d 20 | 09 09 09 09 69 66 20 28 |ist);.- |....if (|
|00002d50| 55 4e 4c 49 4e 4b 28 66 | 6e 29 20 3c 20 30 20 26 |UNLINK(f|n) < 0 &|
|00002d60| 26 20 65 72 72 6e 6f 20 | 21 3d 20 45 4e 4f 45 4e |& errno |!= ENOEN|
|00002d70| 54 29 0a 2d 20 09 09 09 | 09 09 70 65 72 72 6f 72 |T).- ...|..perror|
|00002d80| 28 66 6e 29 3b 0a 2d 20 | 09 09 09 09 72 65 74 75 |(fn);.- |....retu|
|00002d90| 72 6e 3b 0a 2d 20 09 09 | 09 7d 0a 20 20 09 09 09 |rn;.- ..|.}. ...|
|00002da0| 69 66 20 28 70 29 0a 2d | 2d 2d 20 39 33 33 2c 39 |if (p).-|-- 933,9|
|00002db0| 33 34 20 2d 2d 2d 2d 0a | 2a 2a 2a 2a 2a 2a 2a 2a |34 ----.|********|
|00002dc0| 2a 2a 2a 2a 2a 2a 2a 0a | 2a 2a 2a 20 31 31 35 36 |*******.|*** 1156|
|00002dd0| 2c 31 31 35 38 20 2a 2a | 2a 2a 0a 20 20 0a 21 20 |,1158 **|**. .! |
|00002de0| 46 49 4c 45 20 2a 6e 65 | 78 74 68 69 73 74 66 69 |FILE *ne|xthistfi|
|00002df0| 6c 65 28 6f 66 70 29 0a | 20 20 46 49 4c 45 20 2a |le(ofp).| FILE *|
|00002e00| 6f 66 70 3b 0a 2d 2d 2d | 20 31 31 34 38 2c 31 31 |ofp;.---| 1148,11|
|00002e10| 35 31 20 2d 2d 2d 2d 0a | 20 20 0a 21 20 46 49 4c |51 ----.| .! FIL|
|00002e20| 45 20 2a 0a 21 20 6e 65 | 78 74 68 69 73 74 66 69 |E *.! ne|xthistfi|
|00002e30| 6c 65 28 6f 66 70 29 0a | 20 20 46 49 4c 45 20 2a |le(ofp).| FILE *|
|00002e40| 6f 66 70 3b 0a 0a 49 6e | 64 65 78 3a 20 66 75 6e |ofp;..In|dex: fun|
|00002e50| 63 73 2e 63 0a 50 72 65 | 72 65 71 3a 20 32 2e 33 |cs.c.Pre|req: 2.3|
|00002e60| 35 0a 2a 2a 2a 20 2e 64 | 2f 66 75 6e 63 73 2e 63 |5.*** .d|/funcs.c|
|00002e70| 09 57 65 64 20 4f 63 74 | 20 20 37 20 31 36 3a 35 |.Wed Oct| 7 16:5|
|00002e80| 30 3a 35 38 20 31 39 38 | 37 0a 2d 2d 2d 20 66 75 |0:58 198|7.--- fu|
|00002e90| 6e 63 73 2e 63 09 57 65 | 64 20 4f 63 74 20 20 37 |ncs.c.We|d Oct 7|
|00002ea0| 20 31 38 3a 34 39 3a 30 | 30 20 31 39 38 37 0a 2a | 18:49:0|0 1987.*|
|00002eb0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0a 2a |********|******.*|
|00002ec0| 2a 2a 20 31 38 2c 32 30 | 20 2a 2a 2a 2a 0a 20 20 |** 18,20| ****. |
|00002ed0| 23 69 66 64 65 66 20 53 | 43 43 53 49 44 0a 21 20 |#ifdef S|CCSID.! |
|00002ee0| 73 74 61 74 69 63 20 63 | 68 61 72 09 2a 53 63 63 |static c|har.*Scc|
|00002ef0| 73 49 64 20 3d 20 22 40 | 28 23 29 66 75 6e 63 73 |sId = "@|(#)funcs|
|00002f00| 2e 63 09 32 2e 33 35 09 | 31 32 2f 31 36 2f 38 36 |.c.2.35.|12/16/86|
|00002f10| 22 3b 0a 20 20 23 65 6e | 64 69 66 20 2f 2a 20 53 |";. #en|dif /* S|
|00002f20| 43 43 53 49 44 20 2a 2f | 0a 2d 2d 2d 20 31 38 2c |CCSID */|.--- 18,|
|00002f30| 32 30 20 2d 2d 2d 2d 0a | 20 20 23 69 66 64 65 66 |20 ----.| #ifdef|
|00002f40| 20 53 43 43 53 49 44 0a | 21 20 73 74 61 74 69 63 | SCCSID.|! static|
|00002f50| 20 63 68 61 72 09 2a 53 | 63 63 73 49 64 20 3d 20 | char.*S|ccsId = |
|00002f60| 22 40 28 23 29 66 75 6e | 63 73 2e 63 09 32 2e 33 |"@(#)fun|cs.c.2.3|
|00002f70| 36 09 31 30 2f 37 2f 38 | 37 22 3b 0a 20 20 23 65 |6.10/7/8|7";. #e|
|00002f80| 6e 64 69 66 20 2f 2a 20 | 53 43 43 53 49 44 20 2a |ndif /* |SCCSID *|
|00002f90| 2f 0a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |/.******|********|
|00002fa0| 2a 0a 2a 2a 2a 20 32 33 | 33 2c 32 33 35 20 2a 2a |*.*** 23|3,235 **|
|00002fb0| 2a 2a 0a 2d 2d 2d 20 32 | 33 33 2c 32 39 39 20 2d |**.--- 2|33,299 -|
|00002fc0| 2d 2d 2d 0a 20 20 7d 0a | 2b 20 2f 2a 20 46 72 6f |---. }.|+ /* Fro|
|00002fd0| 6d 20 55 43 20 42 65 72 | 6b 65 6c 65 79 20 40 28 |m UC Ber|keley @(|
|00002fe0| 23 29 73 74 72 63 61 73 | 65 63 6d 70 2e 63 09 31 |#)strcas|ecmp.c.1|
|00002ff0| 2e 33 20 28 42 65 72 6b | 65 6c 65 79 29 20 38 2f |.3 (Berk|eley) 8/|
|00003000| 33 2f 38 37 20 2a 2f 0a | 20 20 0a 2b 20 2f 2a 0a |3/87 */.| .+ /*.|
|00003010| 2b 20 20 2a 20 54 68 69 | 73 20 61 72 72 61 79 20 |+ * Thi|s array |
|00003020| 69 73 20 64 65 73 69 67 | 6e 65 64 20 66 6f 72 20 |is desig|ned for |
|00003030| 6d 61 70 70 69 6e 67 20 | 75 70 70 65 72 20 61 6e |mapping |upper an|
|00003040| 64 20 6c 6f 77 65 72 20 | 63 61 73 65 20 6c 65 74 |d lower |case let|
|00003050| 74 65 72 0a 2b 20 20 2a | 20 74 6f 67 65 74 68 65 |ter.+ *| togethe|
|00003060| 72 20 66 6f 72 20 61 20 | 63 61 73 65 20 69 6e 64 |r for a |case ind|
|00003070| 65 70 65 6e 64 65 6e 74 | 20 63 6f 6d 70 61 72 69 |ependent| compari|
|00003080| 73 6f 6e 2e 20 20 54 68 | 65 20 6d 61 70 70 69 6e |son. Th|e mappin|
|00003090| 67 73 20 61 72 65 0a 2b | 20 20 2a 20 62 61 73 65 |gs are.+| * base|
|000030a0| 64 20 75 70 6f 6e 20 61 | 73 63 69 69 20 63 68 61 |d upon a|scii cha|
|000030b0| 72 61 63 74 65 72 20 73 | 65 71 75 65 6e 63 65 73 |racter s|equences|
|000030c0| 2e 0a 2b 20 20 2a 2f 0a | 2b 20 63 68 61 72 20 63 |..+ */.|+ char c|
|000030d0| 68 61 72 6d 61 70 5b 5d | 20 3d 20 7b 0a 2b 20 09 |harmap[]| = {.+ .|
|000030e0| 27 5c 30 30 30 27 2c 20 | 27 5c 30 30 31 27 2c 20 |'\000', |'\001', |
|000030f0| 27 5c 30 30 32 27 2c 20 | 27 5c 30 30 33 27 2c 20 |'\002', |'\003', |
|00003100| 27 5c 30 30 34 27 2c 20 | 27 5c 30 30 35 27 2c 20 |'\004', |'\005', |
|00003110| 27 5c 30 30 36 27 2c 20 | 27 5c 30 30 37 27 2c 0a |'\006', |'\007',.|
|00003120| 2b 20 09 27 5c 30 31 30 | 27 2c 20 27 5c 30 31 31 |+ .'\010|', '\011|
|00003130| 27 2c 20 27 5c 30 31 32 | 27 2c 20 27 5c 30 31 33 |', '\012|', '\013|
|00003140| 27 2c 20 27 5c 30 31 34 | 27 2c 20 27 5c 30 31 35 |', '\014|', '\015|
|00003150| 27 2c 20 27 5c 30 31 36 | 27 2c 20 27 5c 30 31 37 |', '\016|', '\017|
|00003160| 27 2c 0a 2b 20 09 27 5c | 30 32 30 27 2c 20 27 5c |',.+ .'\|020', '\|
|00003170| 30 32 31 27 2c 20 27 5c | 30 32 32 27 2c 20 27 5c |021', '\|022', '\|
|00003180| 30 32 33 27 2c 20 27 5c | 30 32 34 27 2c 20 27 5c |023', '\|024', '\|
|00003190| 30 32 35 27 2c 20 27 5c | 30 32 36 27 2c 20 27 5c |025', '\|026', '\|
|000031a0| 30 32 37 27 2c 0a 2b 20 | 09 27 5c 30 33 30 27 2c |027',.+ |.'\030',|
|000031b0| 20 27 5c 30 33 31 27 2c | 20 27 5c 30 33 32 27 2c | '\031',| '\032',|
|000031c0| 20 27 5c 30 33 33 27 2c | 20 27 5c 30 33 34 27 2c | '\033',| '\034',|
|000031d0| 20 27 5c 30 33 35 27 2c | 20 27 5c 30 33 36 27 2c | '\035',| '\036',|
|000031e0| 20 27 5c 30 33 37 27 2c | 0a 2b 20 09 27 5c 30 34 | '\037',|.+ .'\04|
|000031f0| 30 27 2c 20 27 5c 30 34 | 31 27 2c 20 27 5c 30 34 |0', '\04|1', '\04|
|00003200| 32 27 2c 20 27 5c 30 34 | 33 27 2c 20 27 5c 30 34 |2', '\04|3', '\04|
|00003210| 34 27 2c 20 27 5c 30 34 | 35 27 2c 20 27 5c 30 34 |4', '\04|5', '\04|
|00003220| 36 27 2c 20 27 5c 30 34 | 37 27 2c 0a 2b 20 09 27 |6', '\04|7',.+ .'|
|00003230| 5c 30 35 30 27 2c 20 27 | 5c 30 35 31 27 2c 20 27 |\050', '|\051', '|
|00003240| 5c 30 35 32 27 2c 20 27 | 5c 30 35 33 27 2c 20 27 |\052', '|\053', '|
|00003250| 5c 30 35 34 27 2c 20 27 | 5c 30 35 35 27 2c 20 27 |\054', '|\055', '|
|00003260| 5c 30 35 36 27 2c 20 27 | 5c 30 35 37 27 2c 0a 2b |\056', '|\057',.+|
|00003270| 20 09 27 5c 30 36 30 27 | 2c 20 27 5c 30 36 31 27 | .'\060'|, '\061'|
|00003280| 2c 20 27 5c 30 36 32 27 | 2c 20 27 5c 30 36 33 27 |, '\062'|, '\063'|
|00003290| 2c 20 27 5c 30 36 34 27 | 2c 20 27 5c 30 36 35 27 |, '\064'|, '\065'|
|000032a0| 2c 20 27 5c 30 36 36 27 | 2c 20 27 5c 30 36 37 27 |, '\066'|, '\067'|
|000032b0| 2c 0a 2b 20 09 27 5c 30 | 37 30 27 2c 20 27 5c 30 |,.+ .'\0|70', '\0|
|000032c0| 37 31 27 2c 20 27 5c 30 | 37 32 27 2c 20 27 5c 30 |71', '\0|72', '\0|
|000032d0| 37 33 27 2c 20 27 5c 30 | 37 34 27 2c 20 27 5c 30 |73', '\0|74', '\0|
|000032e0| 37 35 27 2c 20 27 5c 30 | 37 36 27 2c 20 27 5c 30 |75', '\0|76', '\0|
|000032f0| 37 37 27 2c 0a 2b 20 09 | 27 5c 31 30 30 27 2c 20 |77',.+ .|'\100', |
|00003300| 27 5c 31 34 31 27 2c 20 | 27 5c 31 34 32 27 2c 20 |'\141', |'\142', |
|00003310| 27 5c 31 34 33 27 2c 20 | 27 5c 31 34 34 27 2c 20 |'\143', |'\144', |
|00003320| 27 5c 31 34 35 27 2c 20 | 27 5c 31 34 36 27 2c 20 |'\145', |'\146', |
|00003330| 27 5c 31 34 37 27 2c 0a | 2b 20 09 27 5c 31 35 30 |'\147',.|+ .'\150|
|00003340| 27 2c 20 27 5c 31 35 31 | 27 2c 20 27 5c 31 35 32 |', '\151|', '\152|
|00003350| 27 2c 20 27 5c 31 35 33 | 27 2c 20 27 5c 31 35 34 |', '\153|', '\154|
|00003360| 27 2c 20 27 5c 31 35 35 | 27 2c 20 27 5c 31 35 36 |', '\155|', '\156|
|00003370| 27 2c 20 27 5c 31 35 37 | 27 2c 0a 2b 20 09 27 5c |', '\157|',.+ .'\|
|00003380| 31 36 30 27 2c 20 27 5c | 31 36 31 27 2c 20 27 5c |160', '\|161', '\|
|00003390| 31 36 32 27 2c 20 27 5c | 31 36 33 27 2c 20 27 5c |162', '\|163', '\|
|000033a0| 31 36 34 27 2c 20 27 5c | 31 36 35 27 2c 20 27 5c |164', '\|165', '\|
|000033b0| 31 36 36 27 2c 20 27 5c | 31 36 37 27 2c 0a 2b 20 |166', '\|167',.+ |
|000033c0| 09 27 5c 31 37 30 27 2c | 20 27 5c 31 37 31 27 2c |.'\170',| '\171',|
|000033d0| 20 27 5c 31 37 32 27 2c | 20 27 5c 31 33 33 27 2c | '\172',| '\133',|
|000033e0| 20 27 5c 31 33 34 27 2c | 20 27 5c 31 33 35 27 2c | '\134',| '\135',|
|000033f0| 20 27 5c 31 33 36 27 2c | 20 27 5c 31 33 37 27 2c | '\136',| '\137',|
|00003400| 0a 2b 20 09 27 5c 31 34 | 30 27 2c 20 27 5c 31 34 |.+ .'\14|0', '\14|
|00003410| 31 27 2c 20 27 5c 31 34 | 32 27 2c 20 27 5c 31 34 |1', '\14|2', '\14|
|00003420| 33 27 2c 20 27 5c 31 34 | 34 27 2c 20 27 5c 31 34 |3', '\14|4', '\14|
|00003430| 35 27 2c 20 27 5c 31 34 | 36 27 2c 20 27 5c 31 34 |5', '\14|6', '\14|
|00003440| 37 27 2c 0a 2b 20 09 27 | 5c 31 35 30 27 2c 20 27 |7',.+ .'|\150', '|
|00003450| 5c 31 35 31 27 2c 20 27 | 5c 31 35 32 27 2c 20 27 |\151', '|\152', '|
|00003460| 5c 31 35 33 27 2c 20 27 | 5c 31 35 34 27 2c 20 27 |\153', '|\154', '|
|00003470| 5c 31 35 35 27 2c 20 27 | 5c 31 35 36 27 2c 20 27 |\155', '|\156', '|
|00003480| 5c 31 35 37 27 2c 0a 2b | 20 09 27 5c 31 36 30 27 |\157',.+| .'\160'|
|00003490| 2c 20 27 5c 31 36 31 27 | 2c 20 27 5c 31 36 32 27 |, '\161'|, '\162'|
|000034a0| 2c 20 27 5c 31 36 33 27 | 2c 20 27 5c 31 36 34 27 |, '\163'|, '\164'|
|000034b0| 2c 20 27 5c 31 36 35 27 | 2c 20 27 5c 31 36 36 27 |, '\165'|, '\166'|
|000034c0| 2c 20 27 5c 31 36 37 27 | 2c 0a 2b 20 09 27 5c 31 |, '\167'|,.+ .'\1|
|000034d0| 37 30 27 2c 20 27 5c 31 | 37 31 27 2c 20 27 5c 31 |70', '\1|71', '\1|
|000034e0| 37 32 27 2c 20 27 5c 31 | 37 33 27 2c 20 27 5c 31 |72', '\1|73', '\1|
|000034f0| 37 34 27 2c 20 27 5c 31 | 37 35 27 2c 20 27 5c 31 |74', '\1|75', '\1|
|00003500| 37 36 27 2c 20 27 5c 31 | 37 37 27 2c 0a 2b 20 09 |76', '\1|77',.+ .|
|00003510| 27 5c 32 30 30 27 2c 20 | 27 5c 32 30 31 27 2c 20 |'\200', |'\201', |
|00003520| 27 5c 32 30 32 27 2c 20 | 27 5c 32 30 33 27 2c 20 |'\202', |'\203', |
|00003530| 27 5c 32 30 34 27 2c 20 | 27 5c 32 30 35 27 2c 20 |'\204', |'\205', |
|00003540| 27 5c 32 30 36 27 2c 20 | 27 5c 32 30 37 27 2c 0a |'\206', |'\207',.|
|00003550| 2b 20 09 27 5c 32 31 30 | 27 2c 20 27 5c 32 31 31 |+ .'\210|', '\211|
|00003560| 27 2c 20 27 5c 32 31 32 | 27 2c 20 27 5c 32 31 33 |', '\212|', '\213|
|00003570| 27 2c 20 27 5c 32 31 34 | 27 2c 20 27 5c 32 31 35 |', '\214|', '\215|
|00003580| 27 2c 20 27 5c 32 31 36 | 27 2c 20 27 5c 32 31 37 |', '\216|', '\217|
|00003590| 27 2c 0a 2b 20 09 27 5c | 32 32 30 27 2c 20 27 5c |',.+ .'\|220', '\|
|000035a0| 32 32 31 27 2c 20 27 5c | 32 32 32 27 2c 20 27 5c |221', '\|222', '\|
|000035b0| 32 32 33 27 2c 20 27 5c | 32 32 34 27 2c 20 27 5c |223', '\|224', '\|
|000035c0| 32 32 35 27 2c 20 27 5c | 32 32 36 27 2c 20 27 5c |225', '\|226', '\|
|000035d0| 32 32 37 27 2c 0a 2b 20 | 09 27 5c 32 33 30 27 2c |227',.+ |.'\230',|
|000035e0| 20 27 5c 32 33 31 27 2c | 20 27 5c 32 33 32 27 2c | '\231',| '\232',|
|000035f0| 20 27 5c 32 33 33 27 2c | 20 27 5c 32 33 34 27 2c | '\233',| '\234',|
|00003600| 20 27 5c 32 33 35 27 2c | 20 27 5c 32 33 36 27 2c | '\235',| '\236',|
|00003610| 20 27 5c 32 33 37 27 2c | 0a 2b 20 09 27 5c 32 34 | '\237',|.+ .'\24|
|00003620| 30 27 2c 20 27 5c 32 34 | 31 27 2c 20 27 5c 32 34 |0', '\24|1', '\24|
|00003630| 32 27 2c 20 27 5c 32 34 | 33 27 2c 20 27 5c 32 34 |2', '\24|3', '\24|
|00003640| 34 27 2c 20 27 5c 32 34 | 35 27 2c 20 27 5c 32 34 |4', '\24|5', '\24|
|00003650| 36 27 2c 20 27 5c 32 34 | 37 27 2c 0a 2b 20 09 27 |6', '\24|7',.+ .'|
|00003660| 5c 32 35 30 27 2c 20 27 | 5c 32 35 31 27 2c 20 27 |\250', '|\251', '|
|00003670| 5c 32 35 32 27 2c 20 27 | 5c 32 35 33 27 2c 20 27 |\252', '|\253', '|
|00003680| 5c 32 35 34 27 2c 20 27 | 5c 32 35 35 27 2c 20 27 |\254', '|\255', '|
|00003690| 5c 32 35 36 27 2c 20 27 | 5c 32 35 37 27 2c 0a 2b |\256', '|\257',.+|
|000036a0| 20 09 27 5c 32 36 30 27 | 2c 20 27 5c 32 36 31 27 | .'\260'|, '\261'|
|000036b0| 2c 20 27 5c 32 36 32 27 | 2c 20 27 5c 32 36 33 27 |, '\262'|, '\263'|
|000036c0| 2c 20 27 5c 32 36 34 27 | 2c 20 27 5c 32 36 35 27 |, '\264'|, '\265'|
|000036d0| 2c 20 27 5c 32 36 36 27 | 2c 20 27 5c 32 36 37 27 |, '\266'|, '\267'|
|000036e0| 2c 0a 2b 20 09 27 5c 32 | 37 30 27 2c 20 27 5c 32 |,.+ .'\2|70', '\2|
|000036f0| 37 31 27 2c 20 27 5c 32 | 37 32 27 2c 20 27 5c 32 |71', '\2|72', '\2|
|00003700| 37 33 27 2c 20 27 5c 32 | 37 34 27 2c 20 27 5c 32 |73', '\2|74', '\2|
|00003710| 37 35 27 2c 20 27 5c 32 | 37 36 27 2c 20 27 5c 32 |75', '\2|76', '\2|
|00003720| 37 37 27 2c 0a 2b 20 09 | 27 5c 33 30 30 27 2c 20 |77',.+ .|'\300', |
|00003730| 27 5c 33 34 31 27 2c 20 | 27 5c 33 34 32 27 2c 20 |'\341', |'\342', |
|00003740| 27 5c 33 34 33 27 2c 20 | 27 5c 33 34 34 27 2c 20 |'\343', |'\344', |
|00003750| 27 5c 33 34 35 27 2c 20 | 27 5c 33 34 36 27 2c 20 |'\345', |'\346', |
|00003760| 27 5c 33 34 37 27 2c 0a | 2b 20 09 27 5c 33 35 30 |'\347',.|+ .'\350|
|00003770| 27 2c 20 27 5c 33 35 31 | 27 2c 20 27 5c 33 35 32 |', '\351|', '\352|
|00003780| 27 2c 20 27 5c 33 35 33 | 27 2c 20 27 5c 33 35 34 |', '\353|', '\354|
|00003790| 27 2c 20 27 5c 33 35 35 | 27 2c 20 27 5c 33 35 36 |', '\355|', '\356|
|000037a0| 27 2c 20 27 5c 33 35 37 | 27 2c 0a 2b 20 09 27 5c |', '\357|',.+ .'\|
|000037b0| 33 36 30 27 2c 20 27 5c | 33 36 31 27 2c 20 27 5c |360', '\|361', '\|
|000037c0| 33 36 32 27 2c 20 27 5c | 33 36 33 27 2c 20 27 5c |362', '\|363', '\|
|000037d0| 33 36 34 27 2c 20 27 5c | 33 36 35 27 2c 20 27 5c |364', '\|365', '\|
|000037e0| 33 36 36 27 2c 20 27 5c | 33 36 37 27 2c 0a 2b 20 |366', '\|367',.+ |
|000037f0| 09 27 5c 33 37 30 27 2c | 20 27 5c 33 37 31 27 2c |.'\370',| '\371',|
|00003800| 20 27 5c 33 37 32 27 2c | 20 27 5c 33 33 33 27 2c | '\372',| '\333',|
|00003810| 20 27 5c 33 33 34 27 2c | 20 27 5c 33 33 35 27 2c | '\334',| '\335',|
|00003820| 20 27 5c 33 33 36 27 2c | 20 27 5c 33 33 37 27 2c | '\336',| '\337',|
|00003830| 0a 2b 20 09 27 5c 33 34 | 30 27 2c 20 27 5c 33 34 |.+ .'\34|0', '\34|
|00003840| 31 27 2c 20 27 5c 33 34 | 32 27 2c 20 27 5c 33 34 |1', '\34|2', '\34|
|00003850| 33 27 2c 20 27 5c 33 34 | 34 27 2c 20 27 5c 33 34 |3', '\34|4', '\34|
|00003860| 35 27 2c 20 27 5c 33 34 | 36 27 2c 20 27 5c 33 34 |5', '\34|6', '\34|
|00003870| 37 27 2c 0a 2b 20 09 27 | 5c 33 35 30 27 2c 20 27 |7',.+ .'|\350', '|
|00003880| 5c 33 35 31 27 2c 20 27 | 5c 33 35 32 27 2c 20 27 |\351', '|\352', '|
|00003890| 5c 33 35 33 27 2c 20 27 | 5c 33 35 34 27 2c 20 27 |\353', '|\354', '|
|000038a0| 5c 33 35 35 27 2c 20 27 | 5c 33 35 36 27 2c 20 27 |\355', '|\356', '|
|000038b0| 5c 33 35 37 27 2c 0a 2b | 20 09 27 5c 33 36 30 27 |\357',.+| .'\360'|
|000038c0| 2c 20 27 5c 33 36 31 27 | 2c 20 27 5c 33 36 32 27 |, '\361'|, '\362'|
|000038d0| 2c 20 27 5c 33 36 33 27 | 2c 20 27 5c 33 36 34 27 |, '\363'|, '\364'|
|000038e0| 2c 20 27 5c 33 36 35 27 | 2c 20 27 5c 33 36 36 27 |, '\365'|, '\366'|
|000038f0| 2c 20 27 5c 33 36 37 27 | 2c 0a 2b 20 09 27 5c 33 |, '\367'|,.+ .'\3|
|00003900| 37 30 27 2c 20 27 5c 33 | 37 31 27 2c 20 27 5c 33 |70', '\3|71', '\3|
|00003910| 37 32 27 2c 20 27 5c 33 | 37 33 27 2c 20 27 5c 33 |72', '\3|73', '\3|
|00003920| 37 34 27 2c 20 27 5c 33 | 37 35 27 2c 20 27 5c 33 |74', '\3|75', '\3|
|00003930| 37 36 27 2c 20 27 5c 33 | 37 37 27 2c 0a 2b 20 7d |76', '\3|77',.+ }|
|00003940| 3b 0a 2b 20 0a 2b 20 73 | 74 72 63 61 73 65 63 6d |;.+ .+ s|trcasecm|
|00003950| 70 28 73 31 2c 20 73 32 | 29 0a 2b 20 72 65 67 69 |p(s1, s2|).+ regi|
|00003960| 73 74 65 72 20 63 68 61 | 72 20 2a 73 31 2c 20 2a |ster cha|r *s1, *|
|00003970| 73 32 3b 0a 2b 20 7b 0a | 2b 20 09 72 65 67 69 73 |s2;.+ {.|+ .regis|
|00003980| 74 65 72 20 63 68 61 72 | 20 2a 63 6d 20 3d 20 63 |ter char| *cm = c|
|00003990| 68 61 72 6d 61 70 3b 0a | 2b 20 0a 2b 20 09 77 68 |harmap;.|+ .+ .wh|
|000039a0| 69 6c 65 20 28 63 6d 5b | 2a 73 31 5d 20 3d 3d 20 |ile (cm[|*s1] == |
|000039b0| 63 6d 5b 2a 73 32 2b 2b | 5d 29 0a 2b 20 09 09 69 |cm[*s2++|]).+ ..i|
|000039c0| 66 20 28 2a 73 31 2b 2b | 20 3d 3d 20 27 5c 30 27 |f (*s1++| == '\0'|
|000039d0| 29 0a 2b 20 09 09 09 72 | 65 74 75 72 6e 20 30 3b |).+ ...r|eturn 0;|
|000039e0| 0a 2b 20 09 72 65 74 75 | 72 6e 20 63 6d 5b 2a 73 |.+ .retu|rn cm[*s|
|000039f0| 31 5d 20 2d 20 63 6d 5b | 2a 2d 2d 73 32 5d 3b 0a |1] - cm[|*--s2];.|
|00003a00| 2b 20 7d 0a 2b 20 0a 2b | 20 73 74 72 6e 63 61 73 |+ }.+ .+| strncas|
|00003a10| 65 63 6d 70 28 73 31 2c | 20 73 32 2c 20 6e 29 0a |ecmp(s1,| s2, n).|
|00003a20| 2b 20 72 65 67 69 73 74 | 65 72 20 63 68 61 72 20 |+ regist|er char |
|00003a30| 2a 73 31 2c 20 2a 73 32 | 3b 0a 2b 20 72 65 67 69 |*s1, *s2|;.+ regi|
|00003a40| 73 74 65 72 20 69 6e 74 | 20 6e 3b 0a 2b 20 7b 0a |ster int| n;.+ {.|
|00003a50| 2b 20 09 72 65 67 69 73 | 74 65 72 20 63 68 61 72 |+ .regis|ter char|
|00003a60| 20 2a 63 6d 20 3d 20 63 | 68 61 72 6d 61 70 3b 0a | *cm = c|harmap;.|
|00003a70| 2b 20 0a 2b 20 09 77 68 | 69 6c 65 20 28 2d 2d 6e |+ .+ .wh|ile (--n|
|00003a80| 20 3e 3d 20 30 20 26 26 | 20 63 6d 5b 2a 73 31 5d | >= 0 &&| cm[*s1]|
|00003a90| 20 3d 3d 20 63 6d 5b 2a | 73 32 2b 2b 5d 29 0a 2b | == cm[*|s2++]).+|
|00003aa0| 20 09 09 69 66 20 28 2a | 73 31 2b 2b 20 3d 3d 20 | ..if (*|s1++ == |
|00003ab0| 27 5c 30 27 29 0a 2b 20 | 09 09 09 72 65 74 75 72 |'\0').+ |...retur|
|00003ac0| 6e 20 30 3b 0a 2b 20 09 | 72 65 74 75 72 6e 20 6e |n 0;.+ .|return n|
|00003ad0| 20 3c 20 30 20 3f 20 30 | 20 3a 20 63 6d 5b 2a 73 | < 0 ? 0| : cm[*s|
|00003ae0| 31 5d 20 2d 20 63 6d 5b | 2a 2d 2d 73 32 5d 3b 0a |1] - cm[|*--s2];.|
|00003af0| 2b 20 7d 0a 2b 20 0a 20 | 20 70 72 65 66 69 78 28 |+ }.+ . | prefix(|
|00003b00| 66 75 6c 6c 2c 20 70 72 | 65 66 29 0a 2a 2a 2a 2a |full, pr|ef).****|
|00003b10| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 2a 2a 20 |********|***.*** |
|00003b20| 32 33 37 2c 32 34 37 20 | 2a 2a 2a 2a 0a 20 20 7b |237,247 |****. {|
|00003b30| 0a 21 20 09 72 65 67 69 | 73 74 65 72 20 63 68 61 |.! .regi|ster cha|
|00003b40| 72 20 66 63 2c 20 70 63 | 3b 0a 20 20 0a 21 20 09 |r fc, pc|;. .! .|
|00003b50| 77 68 69 6c 65 20 28 28 | 70 63 20 3d 20 2a 70 72 |while ((|pc = *pr|
|00003b60| 65 66 2b 2b 29 20 21 3d | 20 27 5c 30 27 29 20 7b |ef++) !=| '\0') {|
|00003b70| 0a 21 20 09 09 66 63 20 | 3d 20 2a 66 75 6c 6c 2b |.! ..fc |= *full+|
|00003b80| 2b 3b 0a 21 20 09 09 69 | 66 20 28 69 73 75 70 70 |+;.! ..i|f (isupp|
|00003b90| 65 72 28 66 63 29 29 0a | 21 20 09 09 09 66 63 20 |er(fc)).|! ...fc |
|00003ba0| 3d 20 74 6f 6c 6f 77 65 | 72 28 66 63 29 3b 0a 21 |= tolowe|r(fc);.!|
|00003bb0| 20 09 09 69 66 20 28 69 | 73 75 70 70 65 72 28 70 | ..if (i|supper(p|
|00003bc0| 63 29 29 0a 21 20 09 09 | 09 70 63 20 3d 20 74 6f |c)).! ..|.pc = to|
|00003bd0| 6c 6f 77 65 72 28 70 63 | 29 3b 0a 21 20 09 09 69 |lower(pc|);.! ..i|
|00003be0| 66 20 28 66 63 20 21 3d | 20 70 63 29 0a 20 20 09 |f (fc !=| pc). .|
|00003bf0| 09 09 72 65 74 75 72 6e | 20 46 41 4c 53 45 3b 0a |..return| FALSE;.|
|00003c00| 2d 2d 2d 20 33 30 31 2c | 33 30 36 20 2d 2d 2d 2d |--- 301,|306 ----|
|00003c10| 0a 20 20 7b 0a 21 20 09 | 72 65 67 69 73 74 65 72 |. {.! .|register|
|00003c20| 20 63 68 61 72 20 2a 63 | 6d 20 3d 20 63 68 61 72 | char *c|m = char|
|00003c30| 6d 61 70 3b 0a 20 20 0a | 21 20 09 77 68 69 6c 65 |map;. .|! .while|
|00003c40| 20 28 2a 70 72 65 66 20 | 21 3d 20 27 5c 30 27 29 | (*pref |!= '\0')|
|00003c50| 20 7b 0a 21 20 09 09 69 | 66 20 28 63 6d 5b 2a 66 | {.! ..i|f (cm[*f|
|00003c60| 75 6c 6c 2b 2b 5d 20 21 | 3d 20 63 6d 5b 2a 70 72 |ull++] !|= cm[*pr|
|00003c70| 65 66 2b 2b 5d 29 0a 20 | 20 09 09 09 72 65 74 75 |ef++]). | ...retu|
|00003c80| 72 6e 20 46 41 4c 53 45 | 3b 0a 2a 2a 2a 2a 2a 2a |rn FALSE|;.******|
|00003c90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0a 2a 2a 2a 20 35 39 |********|*.*** 59|
|00003ca0| 31 2c 35 39 32 20 2a 2a | 2a 2a 0a 2d 2d 2d 20 36 |1,592 **|**.--- 6|
|00003cb0| 35 30 2c 36 35 34 20 2d | 2d 2d 2d 0a 20 20 09 09 |50,654 -|---. ..|
|00003cc0| 77 68 69 6c 65 20 28 66 | 73 63 61 6e 66 28 66 61 |while (f|scanf(fa|
|00003cd0| 63 66 64 2c 20 22 25 5b | 5e 3a 5d 3a 25 73 5c 6e |cfd, "%[|^:]:%s\n|
|00003ce0| 22 2c 20 66 61 63 75 73 | 65 72 2c 20 66 61 63 74 |", facus|er, fact|
|00003cf0| 65 6d 70 29 20 21 3d 20 | 45 4f 46 29 0a 2b 20 09 |emp) != |EOF).+ .|
|00003d00| 09 7b 0a 2b 20 09 09 09 | 69 66 20 28 66 65 6f 66 |.{.+ ...|if (feof|
|00003d10| 28 66 61 63 66 64 29 29 | 0a 2b 20 09 09 09 09 62 |(facfd))|.+ ....b|
|00003d20| 72 65 61 6b 3b 0a 20 20 | 09 09 09 69 66 20 28 73 |reak;. |...if (s|
|00003d30| 74 72 6e 63 6d 70 28 66 | 61 63 75 73 65 72 2c 20 |trncmp(f|acuser, |
|00003d40| 75 73 65 72 2c 20 42 55 | 46 4c 45 4e 29 20 3d 3d |user, BU|FLEN) ==|
|00003d50| 20 30 29 20 7b 0a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a | 0) {.**|********|
|00003d60| 2a 2a 2a 2a 2a 0a 2a 2a | 2a 20 35 39 36 2c 35 39 |*****.**|* 596,59|
|00003d70| 37 20 2a 2a 2a 2a 0a 2d | 2d 2d 20 36 35 38 2c 36 |7 ****.-|-- 658,6|
|00003d80| 36 30 20 2d 2d 2d 2d 0a | 20 20 09 09 09 7d 0a 2b |60 ----.| ...}.+|
|00003d90| 20 09 09 7d 0a 20 20 09 | 09 66 63 6c 6f 73 65 20 | ..}. .|.fclose |
|00003da0| 28 66 61 63 66 64 29 3b | 0a 49 6e 64 65 78 3a 20 |(facfd);|.Index: |
|00003db0| 66 75 6e 63 73 32 2e 63 | 0a 50 72 65 72 65 71 3a |funcs2.c|.Prereq:|
|00003dc0| 20 31 2e 32 30 0a 2a 2a | 2a 20 2e 64 2f 66 75 6e | 1.20.**|* .d/fun|
|00003dd0| 63 73 32 2e 63 09 57 65 | 64 20 4f 63 74 20 20 37 |cs2.c.We|d Oct 7|
|00003de0| 20 31 36 3a 35 31 3a 31 | 39 20 31 39 38 37 0a 2d | 16:51:1|9 1987.-|
|00003df0| 2d 2d 20 66 75 6e 63 73 | 32 2e 63 09 57 65 64 20 |-- funcs|2.c.Wed |
|00003e00| 4f 63 74 20 20 37 20 31 | 38 3a 34 39 3a 30 31 20 |Oct 7 1|8:49:01 |
|00003e10| 31 39 38 37 0a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |1987.***|********|
|00003e20| 2a 2a 2a 2a 0a 2a 2a 2a | 20 31 39 2c 32 31 20 2a |****.***| 19,21 *|
|00003e30| 2a 2a 2a 0a 20 20 23 69 | 66 64 65 66 20 53 43 43 |***. #i|fdef SCC|
|00003e40| 53 49 44 0a 21 20 73 74 | 61 74 69 63 20 63 68 61 |SID.! st|atic cha|
|00003e50| 72 09 2a 53 63 63 73 49 | 64 20 3d 20 22 40 28 23 |r.*SccsI|d = "@(#|
|00003e60| 29 66 75 6e 63 73 32 2e | 63 09 31 2e 32 30 09 33 |)funcs2.|c.1.20.3|
|00003e70| 2f 32 30 2f 38 37 22 3b | 0a 20 20 23 65 6e 64 69 |/20/87";|. #endi|
|00003e80| 66 20 2f 2a 20 53 43 43 | 53 49 44 20 2a 2f 0a 2d |f /* SCC|SID */.-|
|00003e90| 2d 2d 20 31 39 2c 32 31 | 20 2d 2d 2d 2d 0a 20 20 |-- 19,21| ----. |
|00003ea0| 23 69 66 64 65 66 20 53 | 43 43 53 49 44 0a 21 20 |#ifdef S|CCSID.! |
|00003eb0| 73 74 61 74 69 63 20 63 | 68 61 72 09 2a 53 63 63 |static c|har.*Scc|
|00003ec0| 73 49 64 20 3d 20 22 40 | 28 23 29 66 75 6e 63 73 |sId = "@|(#)funcs|
|00003ed0| 32 2e 63 09 31 2e 32 31 | 09 31 30 2f 37 2f 38 37 |2.c.1.21|.10/7/87|
|00003ee0| 22 3b 0a 20 20 23 65 6e | 64 69 66 20 2f 2a 20 53 |";. #en|dif /* S|
|00003ef0| 43 43 53 49 44 20 2a 2f | 0a 2a 2a 2a 2a 2a 2a 2a |CCSID */|.*******|
|00003f00| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 2a 2a 2a 20 31 32 38 |********|.*** 128|
|00003f10| 2c 31 33 30 20 2a 2a 2a | 2a 0a 20 20 09 20 2a 2f |,130 ***|*. . */|
|00003f20| 0a 21 20 09 69 66 20 28 | 73 74 72 63 6d 70 28 73 |.! .if (|strcmp(s|
|00003f30| 70 2d 3e 73 5f 6e 61 6d | 65 2c 20 22 4d 45 22 29 |p->s_nam|e, "ME")|
|00003f40| 20 3d 3d 20 30 29 0a 20 | 20 09 09 28 76 6f 69 64 | == 0). | ..(void|
|00003f50| 29 20 73 74 72 63 70 79 | 28 73 70 2d 3e 73 5f 6e |) strcpy|(sp->s_n|
|00003f60| 61 6d 65 2c 20 4c 4f 43 | 41 4c 50 41 54 48 53 59 |ame, LOC|ALPATHSY|
|00003f70| 53 4e 41 4d 45 29 3b 0a | 2d 2d 2d 20 31 32 38 2c |SNAME);.|--- 128,|
|00003f80| 31 33 30 20 2d 2d 2d 2d | 0a 20 20 09 20 2a 2f 0a |130 ----|. . */.|
|00003f90| 21 20 09 69 66 20 28 53 | 54 52 43 4d 50 28 73 70 |! .if (S|TRCMP(sp|
|00003fa0| 2d 3e 73 5f 6e 61 6d 65 | 2c 20 22 4d 45 22 29 20 |->s_name|, "ME") |
|00003fb0| 3d 3d 20 30 29 0a 20 20 | 09 09 28 76 6f 69 64 29 |== 0). |..(void)|
|00003fc0| 20 73 74 72 63 70 79 28 | 73 70 2d 3e 73 5f 6e 61 | strcpy(|sp->s_na|
|00003fd0| 6d 65 2c 20 4c 4f 43 41 | 4c 50 41 54 48 53 59 53 |me, LOCA|LPATHSYS|
|00003fe0| 4e 41 4d 45 29 3b 0a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |NAME);.*|********|
|00003ff0| 2a 2a 2a 2a 2a 2a 0a 2a | 2a 2a 20 31 37 30 2c 31 |******.*|** 170,1|
|00004000| 37 32 20 2a 2a 2a 2a 0a | 20 20 09 77 68 69 6c 65 |72 ****.| .while|
|00004010| 20 28 73 5f 72 65 61 64 | 28 73 70 29 29 0a 21 20 | (s_read|(sp)).! |
|00004020| 09 09 69 66 20 28 73 74 | 72 6e 63 6d 70 28 73 79 |..if (st|rncmp(sy|
|00004030| 73 74 65 6d 2c 20 73 70 | 2d 3e 73 5f 6e 61 6d 65 |stem, sp|->s_name|
|00004040| 2c 20 53 4e 4c 4e 29 20 | 3d 3d 20 30 29 20 7b 0a |, SNLN) |== 0) {.|
|00004050| 20 20 09 09 09 73 5f 63 | 6c 6f 73 65 28 29 3b 0a | ...s_c|lose();.|
|00004060| 2d 2d 2d 20 31 37 30 2c | 31 37 32 20 2d 2d 2d 2d |--- 170,|172 ----|
|00004070| 0a 20 20 09 77 68 69 6c | 65 20 28 73 5f 72 65 61 |. .whil|e (s_rea|
|00004080| 64 28 73 70 29 29 0a 21 | 20 09 09 69 66 20 28 53 |d(sp)).!| ..if (S|
|00004090| 54 52 4e 43 4d 50 28 73 | 79 73 74 65 6d 2c 20 73 |TRNCMP(s|ystem, s|
|000040a0| 70 2d 3e 73 5f 6e 61 6d | 65 2c 20 53 4e 4c 4e 29 |p->s_nam|e, SNLN)|
|000040b0| 20 3d 3d 20 30 29 20 7b | 0a 20 20 09 09 09 73 5f | == 0) {|. ...s_|
|000040c0| 63 6c 6f 73 65 28 29 3b | 0a 2a 2a 2a 2a 2a 2a 2a |close();|.*******|
|000040d0| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 2a 2a 2a 20 31 39 36 |********|.*** 196|
|000040e0| 2c 31 39 38 20 2a 2a 2a | 2a 0a 20 20 0a 21 20 09 |,198 ***|*. .! .|
|000040f0| 69 66 20 28 20 6c 61 73 | 74 64 61 74 65 73 74 72 |if ( las|tdatestr|
|00004100| 5b 30 5d 20 26 26 20 73 | 74 72 63 6d 70 28 64 61 |[0] && s|trcmp(da|
|00004110| 74 65 73 74 72 2c 20 6c | 61 73 74 64 61 74 65 73 |testr, l|astdates|
|00004120| 74 72 29 20 3d 3d 20 30 | 29 0a 20 20 09 09 72 65 |tr) == 0|). ..re|
|00004130| 74 75 72 6e 20 6c 61 73 | 74 74 69 6d 65 3b 0a 2d |turn las|ttime;.-|
|00004140| 2d 2d 20 31 39 36 2c 31 | 39 38 20 2d 2d 2d 2d 0a |-- 196,1|98 ----.|
|00004150| 20 20 0a 21 20 09 69 66 | 20 28 20 6c 61 73 74 64 | .! .if| ( lastd|
|00004160| 61 74 65 73 74 72 5b 30 | 5d 20 26 26 20 53 54 52 |atestr[0|] && STR|
|00004170| 43 4d 50 28 64 61 74 65 | 73 74 72 2c 20 6c 61 73 |CMP(date|str, las|
|00004180| 74 64 61 74 65 73 74 72 | 29 20 3d 3d 20 30 29 0a |tdatestr|) == 0).|
|00004190| 20 20 09 09 72 65 74 75 | 72 6e 20 6c 61 73 74 74 | ..retu|rn lastt|
|000041a0| 69 6d 65 3b 0a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |ime;.***|********|
|000041b0| 2a 2a 2a 2a 0a 2a 2a 2a | 20 32 30 33 2c 32 30 34 |****.***| 203,204|
|000041c0| 20 2a 2a 2a 2a 0a 2d 2d | 2d 20 32 30 33 2c 32 30 | ****.--|- 203,20|
|000041d0| 39 20 2d 2d 2d 2d 0a 20 | 20 09 09 6c 61 73 74 74 |9 ----. | ..lastt|
|000041e0| 69 6d 65 20 3d 20 67 65 | 74 64 61 74 65 28 62 66 |ime = ge|tdate(bf|
|000041f0| 72 2c 20 26 4e 6f 77 29 | 3b 0a 2b 20 09 09 69 66 |r, &Now)|;.+ ..if|
|00004200| 20 28 6c 61 73 74 74 69 | 6d 65 20 3c 20 30 29 20 | (lastti|me < 0) |
|00004210| 7b 0a 2b 20 09 09 09 6c | 6f 67 65 72 72 28 22 55 |{.+ ...l|ogerr("U|
|00004220| 6e 70 61 72 73 61 62 6c | 65 20 64 61 74 65 20 5c |nparsabl|e date \|
|00004230| 22 25 73 5c 22 22 2c 20 | 64 61 74 65 73 74 72 29 |"%s\"", |datestr)|
|00004240| 3b 0a 2b 20 09 09 09 64 | 61 74 65 73 74 72 20 3d |;.+ ...d|atestr =|
|00004250| 20 22 6e 6f 77 22 3b 09 | 2f 2a 20 62 65 74 74 65 | "now";.|/* bette|
|00004260| 72 20 74 68 61 6e 20 6e | 6f 74 68 69 6e 67 20 2a |r than n|othing *|
|00004270| 2f 0a 2b 20 09 09 09 6c | 61 73 74 74 69 6d 65 20 |/.+ ...l|asttime |
|00004280| 3d 20 4e 6f 77 2e 74 69 | 6d 65 3b 0a 2b 20 09 09 |= Now.ti|me;.+ ..|
|00004290| 7d 0a 20 20 09 7d 0a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |}. .}.*|********|
|000042a0| 2a 2a 2a 2a 2a 2a 0a 2a | 2a 2a 20 33 32 30 2c 33 |******.*|** 320,3|
|000042b0| 32 32 20 2a 2a 2a 2a 0a | 20 20 09 70 74 72 20 3d |22 ****.| .ptr =|
|000042c0| 20 68 70 74 72 2d 3e 70 | 61 74 68 3b 0a 21 20 09 | hptr->p|ath;.! .|
|000042d0| 69 66 20 28 70 72 65 66 | 69 78 28 70 74 72 2c 20 |if (pref|ix(ptr, |
|000042e0| 50 41 54 48 53 59 53 4e | 41 4d 45 29 20 26 26 0a |PATHSYSN|AME) &&.|
|000042f0| 20 20 09 09 69 6e 64 65 | 78 28 4e 45 54 43 48 52 | ..inde|x(NETCHR|
|00004300| 53 2c 20 70 74 72 5b 73 | 74 72 6c 65 6e 28 50 41 |S, ptr[s|trlen(PA|
|00004310| 54 48 53 59 53 4e 41 4d | 45 29 5d 29 29 0a 2d 2d |THSYSNAM|E)])).--|
|00004320| 2d 20 33 32 35 2c 33 32 | 37 20 2d 2d 2d 2d 0a 20 |- 325,32|7 ----. |
|00004330| 20 09 70 74 72 20 3d 20 | 68 70 74 72 2d 3e 70 61 | .ptr = |hptr->pa|
|00004340| 74 68 3b 0a 21 20 09 69 | 66 20 28 50 52 45 46 49 |th;.! .i|f (PREFI|
|00004350| 58 28 70 74 72 2c 20 50 | 41 54 48 53 59 53 4e 41 |X(ptr, P|ATHSYSNA|
|00004360| 4d 45 29 20 26 26 0a 20 | 20 09 09 69 6e 64 65 78 |ME) &&. | ..index|
|00004370| 28 4e 45 54 43 48 52 53 | 2c 20 70 74 72 5b 73 74 |(NETCHRS|, ptr[st|
|00004380| 72 6c 65 6e 28 50 41 54 | 48 53 59 53 4e 41 4d 45 |rlen(PAT|HSYSNAME|
|00004390| 29 5d 29 29 0a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |)])).***|********|
|000043a0| 2a 2a 2a 2a 0a 2a 2a 2a | 20 33 32 38 2c 33 32 39 |****.***| 328,329|
|000043b0| 20 2a 2a 2a 2a 0a 2d 2d | 2d 20 33 33 33 2c 33 33 | ****.--|- 333,33|
|000043c0| 37 20 2d 2d 2d 2d 0a 20 | 20 09 09 70 74 72 20 3d |7 ----. | ..ptr =|
|000043d0| 20 68 70 74 72 2d 3e 72 | 65 70 6c 79 74 6f 3b 0a | hptr->r|eplyto;.|
|000043e0| 2b 20 23 65 6c 73 65 20 | 2f 2a 20 21 49 4e 54 45 |+ #else |/* !INTE|
|000043f0| 52 4e 45 54 20 2a 2f 0a | 2b 20 09 69 66 20 28 68 |RNET */.|+ .if (h|
|00004400| 70 74 72 2d 3e 72 65 70 | 6c 79 74 6f 5b 30 5d 20 |ptr->rep|lyto[0] |
|00004410| 26 26 20 21 69 6e 64 65 | 78 28 68 70 74 72 2d 3e |&& !inde|x(hptr->|
|00004420| 72 65 70 6c 79 74 6f 2c | 20 27 40 27 29 29 0a 2b |replyto,| '@')).+|
|00004430| 20 09 09 70 74 72 20 3d | 20 68 70 74 72 2d 3e 72 | ..ptr =| hptr->r|
|00004440| 65 70 6c 79 74 6f 3b 0a | 20 20 23 65 6e 64 69 66 |eplyto;.| #endif|
|00004450| 0a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.*******|********|
|00004460| 0a 2a 2a 2a 20 33 33 38 | 2c 33 34 30 20 2a 2a 2a |.*** 338|,340 ***|
|00004470| 2a 0a 20 20 09 69 66 20 | 28 70 74 72 20 3d 20 72 |*. .if |(ptr = r|
|00004480| 69 6e 64 65 78 28 74 62 | 75 66 2c 20 27 2e 27 29 |index(tb|uf, '.')|
|00004490| 29 20 7b 0a 21 20 09 09 | 69 66 20 28 70 72 65 66 |) {.! ..|if (pref|
|000044a0| 69 78 28 2b 2b 70 74 72 | 2c 20 22 4f 5a 22 29 29 |ix(++ptr|, "OZ"))|
|000044b0| 20 7b 0a 20 20 09 09 09 | 2f 2a 20 73 6f 6d 65 20 | {. ...|/* some |
|000044c0| 70 65 6f 70 6c 65 20 6f | 6e 6c 79 20 61 6c 6c 6f |people o|nly allo|
|000044d0| 77 20 69 74 20 69 6e 20 | 6c 6f 77 65 72 20 63 61 |w it in |lower ca|
|000044e0| 73 65 20 2e 2e 2e 20 2a | 2f 0a 2d 2d 2d 20 33 34 |se ... *|/.--- 34|
|000044f0| 36 2c 33 34 38 20 2d 2d | 2d 2d 0a 20 20 09 69 66 |6,348 --|--. .if|
|00004500| 20 28 70 74 72 20 3d 20 | 72 69 6e 64 65 78 28 74 | (ptr = |rindex(t|
|00004510| 62 75 66 2c 20 27 2e 27 | 29 29 20 7b 0a 21 20 09 |buf, '.'|)) {.! .|
|00004520| 09 69 66 20 28 50 52 45 | 46 49 58 28 2b 2b 70 74 |.if (PRE|FIX(++pt|
|00004530| 72 2c 20 22 4f 5a 22 29 | 29 20 7b 0a 20 20 09 09 |r, "OZ")|) {. ..|
|00004540| 09 2f 2a 20 73 6f 6d 65 | 20 70 65 6f 70 6c 65 20 |./* some| people |
|00004550| 6f 6e 6c 79 20 61 6c 6c | 6f 77 20 69 74 20 69 6e |only all|ow it in|
|00004560| 20 6c 6f 77 65 72 20 63 | 61 73 65 20 2e 2e 2e 20 | lower c|ase ... |
|00004570| 2a 2f 0a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |*/.*****|********|
|00004580| 2a 2a 0a 2a 2a 2a 20 33 | 34 33 2c 33 34 36 20 2a |**.*** 3|43,346 *|
|00004590| 2a 2a 2a 0a 20 20 09 09 | 7d 0a 21 20 09 09 69 66 |***. ..|}.! ..if|
|000045a0| 20 28 70 72 65 66 69 78 | 28 70 74 72 2c 20 22 55 | (prefix|(ptr, "U|
|000045b0| 55 43 50 22 29 20 7c 7c | 20 70 72 65 66 69 78 28 |UCP") ||| prefix(|
|000045c0| 70 74 72 2c 20 22 41 52 | 50 41 22 29 20 7c 7c 0a |ptr, "AR|PA") ||.|
|000045d0| 21 20 09 09 20 20 20 20 | 70 72 65 66 69 78 28 70 |! .. |prefix(p|
|000045e0| 74 72 2c 20 22 44 45 43 | 22 29 20 7c 7c 20 70 72 |tr, "DEC|") || pr|
|000045f0| 65 66 69 78 28 70 74 72 | 2c 20 22 43 53 4e 45 54 |efix(ptr|, "CSNET|
|00004600| 22 29 29 20 7b 0a 20 20 | 09 09 09 73 74 72 63 61 |")) {. |...strca|
|00004610| 74 28 74 62 75 66 2c 20 | 22 40 6d 75 6e 6e 61 72 |t(tbuf, |"@munnar|
|00004620| 69 2e 6f 7a 22 29 3b 09 | 2f 2a 20 76 69 61 20 73 |i.oz");.|/* via s|
|00004630| 75 6e 20 74 6f 20 6d 75 | 6e 6e 61 72 69 20 2a 2f |un to mu|nnari */|
|00004640| 0a 2d 2d 2d 20 33 35 31 | 2c 33 35 34 20 2d 2d 2d |.--- 351|,354 ---|
|00004650| 2d 0a 20 20 09 09 7d 0a | 21 20 09 09 69 66 20 28 |-. ..}.|! ..if (|
|00004660| 50 52 45 46 49 58 28 70 | 74 72 2c 20 22 55 55 43 |PREFIX(p|tr, "UUC|
|00004670| 50 22 29 20 7c 7c 20 50 | 52 45 46 49 58 28 70 74 |P") || P|REFIX(pt|
|00004680| 72 2c 20 22 41 52 50 41 | 22 29 20 7c 7c 0a 21 20 |r, "ARPA|") ||.! |
|00004690| 09 09 20 20 20 20 50 52 | 45 46 49 58 28 70 74 72 |.. PR|EFIX(ptr|
|000046a0| 2c 20 22 44 45 43 22 29 | 20 7c 7c 20 50 52 45 46 |, "DEC")| || PREF|
|000046b0| 49 58 28 70 74 72 2c 20 | 22 43 53 4e 45 54 22 29 |IX(ptr, |"CSNET")|
|000046c0| 29 20 7b 0a 20 20 09 09 | 09 73 74 72 63 61 74 28 |) {. ..|.strcat(|
|000046d0| 74 62 75 66 2c 20 22 40 | 6d 75 6e 6e 61 72 69 2e |tbuf, "@|munnari.|
|000046e0| 6f 7a 22 29 3b 09 2f 2a | 20 76 69 61 20 73 75 6e |oz");./*| via sun|
|000046f0| 20 74 6f 20 6d 75 6e 6e | 61 72 69 20 2a 2f 0a 2a | to munn|ari */.*|
|00004700| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0a 2a |********|******.*|
|00004710| 2a 2a 20 33 35 34 2c 33 | 35 36 20 2a 2a 2a 2a 0a |** 354,3|56 ****.|
|00004720| 20 20 09 66 6f 72 20 28 | 70 74 72 20 3d 20 74 62 | .for (|ptr = tb|
|00004730| 75 66 20 3b 3b 20 70 74 | 72 2b 2b 29 20 7b 0a 21 |uf ;; pt|r++) {.!|
|00004740| 20 09 09 69 66 20 28 70 | 72 65 66 69 78 28 70 74 | ..if (p|refix(pt|
|00004750| 72 2c 20 22 6d 75 6e 6e | 61 72 69 21 22 29 29 20 |r, "munn|ari!")) |
|00004760| 7b 0a 20 20 09 09 09 73 | 74 72 63 70 79 28 74 62 |{. ...s|trcpy(tb|
|00004770| 75 66 2c 20 70 74 72 2b | 38 29 3b 0a 2d 2d 2d 20 |uf, ptr+|8);.--- |
|00004780| 33 36 32 2c 33 36 34 20 | 2d 2d 2d 2d 0a 20 20 09 |362,364 |----. .|
|00004790| 66 6f 72 20 28 70 74 72 | 20 3d 20 74 62 75 66 20 |for (ptr| = tbuf |
|000047a0| 3b 3b 20 70 74 72 2b 2b | 29 20 7b 0a 21 20 09 09 |;; ptr++|) {.! ..|
|000047b0| 69 66 20 28 50 52 45 46 | 49 58 28 70 74 72 2c 20 |if (PREF|IX(ptr, |
|000047c0| 22 6d 75 6e 6e 61 72 69 | 21 22 29 29 20 7b 0a 20 |"munnari|!")) {. |
|000047d0| 20 09 09 09 73 74 72 63 | 70 79 28 74 62 75 66 2c | ...strc|py(tbuf,|
|000047e0| 20 70 74 72 2b 38 29 3b | 0a 2a 2a 2a 2a 2a 2a 2a | ptr+8);|.*******|
|000047f0| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 2a 2a 2a 20 33 39 32 |********|.*** 392|
|00004800| 2c 33 39 34 20 2a 2a 2a | 2a 0a 20 20 09 09 09 09 |,394 ***|*. ....|
|00004810| 4c 49 42 29 3b 0a 21 20 | 09 7d 20 77 68 69 6c 65 |LIB);.! |.} while|
|00004820| 20 28 21 70 72 65 66 69 | 78 28 6d 62 75 66 2c 20 | (!prefi|x(mbuf, |
|00004830| 22 69 6e 74 65 72 6e 65 | 74 22 29 29 3b 0a 20 20 |"interne|t"));. |
|00004840| 09 69 66 20 28 73 73 63 | 61 6e 66 28 6d 62 75 66 |.if (ssc|anf(mbuf|
|00004850| 2c 20 22 25 2a 73 20 25 | 73 22 2c 20 6d 6f 64 61 |, "%*s %|s", moda|
|00004860| 64 64 29 20 21 3d 20 31 | 29 0a 2d 2d 2d 20 34 30 |dd) != 1|).--- 40|
|00004870| 30 2c 34 30 32 20 2d 2d | 2d 2d 0a 20 20 09 09 09 |0,402 --|--. ...|
|00004880| 09 4c 49 42 29 3b 0a 21 | 20 09 7d 20 77 68 69 6c |.LIB);.!| .} whil|
|00004890| 65 20 28 21 50 52 45 46 | 49 58 28 6d 62 75 66 2c |e (!PREF|IX(mbuf,|
|000048a0| 20 22 69 6e 74 65 72 6e | 65 74 22 29 29 3b 0a 20 | "intern|et"));. |
|000048b0| 20 09 69 66 20 28 73 73 | 63 61 6e 66 28 6d 62 75 | .if (ss|canf(mbu|
|000048c0| 66 2c 20 22 25 2a 73 20 | 25 73 22 2c 20 6d 6f 64 |f, "%*s |%s", mod|
|000048d0| 61 64 64 29 20 21 3d 20 | 31 29 0a 2a 2a 2a 2a 2a |add) != |1).*****|
|000048e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0a 2a 2a 2a 20 34 |********|**.*** 4|
|000048f0| 32 30 2c 34 32 38 20 2a | 2a 2a 2a 0a 20 20 0a 2d |20,428 *|***. .-|
|00004900| 20 23 69 66 64 65 66 20 | 44 42 4d 0a 2d 20 74 79 | #ifdef |DBM.- ty|
|00004910| 70 65 64 65 66 20 73 74 | 72 75 63 74 20 7b 0a 2d |pedef st|ruct {.-|
|00004920| 20 09 63 68 61 72 20 2a | 64 70 74 72 3b 0a 2d 20 | .char *|dptr;.- |
|00004930| 09 69 6e 74 20 64 73 69 | 7a 65 3b 0a 2d 20 7d 20 |.int dsi|ze;.- } |
|00004940| 64 61 74 75 6d 3b 0a 2d | 20 23 65 6e 64 69 66 20 |datum;.-| #endif |
|00004950| 2f 2a 20 44 42 4d 20 2a | 2f 0a 2d 20 0a 20 20 2f |/* DBM *|/.- . /|
|00004960| 2a 0a 2d 2d 2d 20 34 32 | 38 2c 34 32 39 20 2d 2d |*.--- 42|8,429 --|
|00004970| 2d 2d 0a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |--.*****|********|
|00004980| 2a 2a 0a 2a 2a 2a 20 34 | 37 38 2c 34 38 30 20 2a |**.*** 4|78,480 *|
|00004990| 2a 2a 2a 0a 20 20 09 09 | 2a 70 20 3d 20 30 3b 0a |***. ..|*p = 0;.|
|000049a0| 21 20 09 09 69 66 20 28 | 73 74 72 63 6d 70 28 6c |! ..if (|strcmp(l|
|000049b0| 62 75 66 2c 20 61 72 74 | 69 64 29 20 3d 3d 20 30 |buf, art|id) == 0|
|000049c0| 20 7c 7c 20 73 74 72 63 | 6d 70 28 6c 62 75 66 2c | || strc|mp(lbuf,|
|000049d0| 20 6f 69 64 62 75 66 29 | 20 3d 3d 20 30 29 20 7b | oidbuf)| == 0) {|
|000049e0| 0a 20 20 09 09 09 28 76 | 6f 69 64 29 20 66 63 6c |. ...(v|oid) fcl|
|000049f0| 6f 73 65 28 68 66 70 29 | 3b 0a 2d 2d 2d 20 34 37 |ose(hfp)|;.--- 47|
|00004a00| 39 2c 34 38 31 20 2d 2d | 2d 2d 0a 20 20 09 09 2a |9,481 --|--. ..*|
|00004a10| 70 20 3d 20 30 3b 0a 21 | 20 09 09 69 66 20 28 53 |p = 0;.!| ..if (S|
|00004a20| 54 52 43 4d 50 28 6c 62 | 75 66 2c 20 61 72 74 69 |TRCMP(lb|uf, arti|
|00004a30| 64 29 20 3d 3d 20 30 20 | 7c 7c 20 53 54 52 43 4d |d) == 0 ||| STRCM|
|00004a40| 50 28 6c 62 75 66 2c 20 | 6f 69 64 62 75 66 29 20 |P(lbuf, |oidbuf) |
|00004a50| 3d 3d 20 30 29 20 7b 0a | 20 20 09 09 09 28 76 6f |== 0) {.| ...(vo|
|00004a60| 69 64 29 20 66 63 6c 6f | 73 65 28 68 66 70 29 3b |id) fclo|se(hfp);|
|00004a70| 0a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.*******|********|
|00004a80| 0a 2a 2a 2a 20 35 37 33 | 2c 35 37 35 20 2a 2a 2a |.*** 573|,575 ***|
|00004a90| 2a 0a 20 20 0a 21 20 23 | 69 66 20 21 64 65 66 69 |*. .! #|if !defi|
|00004aa0| 6e 65 64 28 42 53 44 34 | 5f 32 29 20 26 26 20 21 |ned(BSD4|_2) && !|
|00004ab0| 64 65 66 69 6e 65 64 28 | 42 53 44 34 5f 31 43 29 |defined(|BSD4_1C)|
|00004ac0| 0a 20 20 72 65 6e 61 6d | 65 28 66 72 6f 6d 2c 74 |. renam|e(from,t|
|00004ad0| 6f 29 0a 2d 2d 2d 20 35 | 37 34 2c 35 37 36 20 2d |o).--- 5|74,576 -|
|00004ae0| 2d 2d 2d 0a 20 20 0a 21 | 20 23 69 66 20 21 64 65 |---. .!| #if !de|
|00004af0| 66 69 6e 65 64 28 42 53 | 44 34 5f 32 29 0a 20 20 |fined(BS|D4_2). |
|00004b00| 72 65 6e 61 6d 65 28 66 | 72 6f 6d 2c 74 6f 29 0a |rename(f|rom,to).|
|00004b10| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0a |********|*******.|
|00004b20| 2a 2a 2a 20 35 38 34 2c | 35 38 36 20 2a 2a 2a 2a |*** 584,|586 ****|
|00004b30| 0a 20 20 7d 0a 21 20 23 | 65 6e 64 69 66 20 2f 2a |. }.! #|endif /*|
|00004b40| 20 21 42 53 44 34 5f 32 | 20 26 26 20 21 20 42 53 | !BSD4_2| && ! BS|
|00004b50| 44 34 5f 31 43 20 2a 2f | 0a 20 20 0a 2d 2d 2d 20 |D4_1C */|. .--- |
|00004b60| 35 38 35 2c 35 38 37 20 | 2d 2d 2d 2d 0a 20 20 7d |585,587 |----. }|
|00004b70| 0a 21 20 23 65 6e 64 69 | 66 20 2f 2a 20 21 42 53 |.! #endi|f /* !BS|
|00004b80| 44 34 5f 32 20 2a 2f 0a | 20 20 0a 2a 2a 2a 2a 2a |D4_2 */.| .*****|
|00004b90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0a 2a 2a 2a 20 36 |********|**.*** 6|
|00004ba0| 36 36 2c 36 36 38 20 2a | 2a 2a 2a 0a 20 20 7b 0a |66,668 *|***. {.|
|00004bb0| 21 20 09 72 65 67 69 73 | 74 65 72 20 63 68 61 72 |! .regis|ter char|
|00004bc0| 20 2a 72 2c 20 2a 71 2c | 20 2a 74 70 3b 0a 20 20 | *r, *q,| *tp;. |
|00004bd0| 09 63 68 61 72 20 2a 74 | 61 69 6c 70 61 74 68 28 |.char *t|ailpath(|
|00004be0| 29 3b 0a 2d 2d 2d 20 36 | 36 37 2c 36 36 39 20 2d |);.--- 6|67,669 -|
|00004bf0| 2d 2d 2d 0a 20 20 7b 0a | 21 20 09 72 65 67 69 73 |---. {.|! .regis|
|00004c00| 74 65 72 20 63 68 61 72 | 20 2a 71 2c 20 2a 74 70 |ter char| *q, *tp|
|00004c10| 3b 0a 20 20 09 63 68 61 | 72 20 2a 74 61 69 6c 70 |;. .cha|r *tailp|
|00004c20| 61 74 68 28 29 3b 0a 49 | 6e 64 65 78 3a 20 68 65 |ath();.I|ndex: he|
|00004c30| 61 64 65 72 2e 63 0a 50 | 72 65 72 65 71 3a 20 32 |ader.c.P|rereq: 2|
|00004c40| 2e 34 38 0a 2a 2a 2a 20 | 2e 64 2f 68 65 61 64 65 |.48.*** |.d/heade|
|00004c50| 72 2e 63 09 57 65 64 20 | 4f 63 74 20 20 37 20 31 |r.c.Wed |Oct 7 1|
|00004c60| 36 3a 35 31 3a 35 37 20 | 31 39 38 37 0a 2d 2d 2d |6:51:57 |1987.---|
|00004c70| 20 68 65 61 64 65 72 2e | 63 09 57 65 64 20 4f 63 | header.|c.Wed Oc|
|00004c80| 74 20 20 37 20 31 38 3a | 34 39 3a 30 33 20 31 39 |t 7 18:|49:03 19|
|00004c90| 38 37 0a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |87.*****|********|
|00004ca0| 2a 2a 0a 2a 2a 2a 20 31 | 36 2c 31 37 20 2a 2a 2a |**.*** 1|6,17 ***|
|00004cb0| 2a 0a 2d 2d 2d 20 31 36 | 2c 31 38 20 2d 2d 2d 2d |*.--- 16|,18 ----|
|00004cc0| 0a 20 20 20 2a 2f 0a 2b | 20 2f 2a 4c 49 4e 54 4c |. */.+| /*LINTL|
|00004cd0| 49 42 52 41 52 59 2a 2f | 0a 20 20 0a 2a 2a 2a 2a |IBRARY*/|. .****|
|00004ce0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 2a 2a 20 |********|***.*** |
|00004cf0| 31 38 2c 32 30 20 2a 2a | 2a 2a 0a 20 20 23 69 66 |18,20 **|**. #if|
|00004d00| 64 65 66 20 53 43 43 53 | 49 44 0a 21 20 73 74 61 |def SCCS|ID.! sta|
|00004d10| 74 69 63 20 63 68 61 72 | 09 2a 53 63 63 73 49 64 |tic char|.*SccsId|
|00004d20| 20 3d 20 22 40 28 23 29 | 68 65 61 64 65 72 2e 63 | = "@(#)|header.c|
|00004d30| 09 32 2e 34 38 09 33 2f | 32 30 2f 38 37 22 3b 0a |.2.48.3/|20/87";.|
|00004d40| 20 20 23 65 6e 64 69 66 | 20 2f 2a 20 53 43 43 53 | #endif| /* SCCS|
|00004d50| 49 44 20 2a 2f 0a 2d 2d | 2d 20 31 39 2c 32 31 20 |ID */.--|- 19,21 |
|00004d60| 2d 2d 2d 2d 0a 20 20 23 | 69 66 64 65 66 20 53 43 |----. #|ifdef SC|
|00004d70| 43 53 49 44 0a 21 20 73 | 74 61 74 69 63 20 63 68 |CSID.! s|tatic ch|
|00004d80| 61 72 09 2a 53 63 63 73 | 49 64 20 3d 20 22 40 28 |ar.*Sccs|Id = "@(|
|00004d90| 23 29 68 65 61 64 65 72 | 2e 63 09 32 2e 34 39 09 |#)header|.c.2.49.|
|00004da0| 31 30 2f 37 2f 38 37 22 | 3b 0a 20 20 23 65 6e 64 |10/7/87"|;. #end|
|00004db0| 69 66 20 2f 2a 20 53 43 | 43 53 49 44 20 2a 2f 0a |if /* SC|CSID */.|
|00004dc0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0a |********|*******.|
|00004dd0| 2a 2a 2a 20 31 34 39 2c | 31 35 30 20 2a 2a 2a 2a |*** 149,|150 ****|
|00004de0| 0a 2d 2d 2d 20 31 35 30 | 2c 31 35 32 20 2d 2d 2d |.--- 150|,152 ---|
|00004df0| 2d 0a 20 20 23 64 65 66 | 69 6e 65 20 58 50 41 54 |-. #def|ine XPAT|
|00004e00| 48 09 09 32 36 0a 2b 20 | 23 64 65 66 69 6e 65 20 |H..26.+ |#define |
|00004e10| 53 55 50 45 52 53 45 44 | 45 53 09 32 37 0a 20 20 |SUPERSED|ES.27. |
|00004e20| 23 64 65 66 69 6e 65 20 | 4f 54 48 45 52 09 09 39 |#define |OTHER..9|
|00004e30| 39 0a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |9.******|********|
|00004e40| 2a 0a 2a 2a 2a 20 31 35 | 39 2c 31 36 31 20 2a 2a |*.*** 15|9,161 **|
|00004e50| 2a 2a 0a 20 20 09 72 65 | 67 69 73 74 65 72 20 69 |**. .re|gister i|
|00004e60| 6e 74 09 69 3b 0a 2d 20 | 09 6c 6f 6e 67 09 63 75 |nt.i;.- |.long.cu|
|00004e70| 72 70 6f 73 3b 0a 20 20 | 0a 2d 2d 2d 20 31 36 31 |rpos;. |.--- 161|
|00004e80| 2c 31 36 32 20 2d 2d 2d | 2d 0a 2a 2a 2a 2a 2a 2a |,162 ---|-.******|
|00004e90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0a 2a 2a 2a 20 31 36 |********|*.*** 16|
|00004ea0| 33 2c 31 36 35 20 2a 2a | 2a 2a 0a 20 20 09 64 6f |3,165 **|**. .do|
|00004eb0| 20 7b 0a 2d 20 09 09 63 | 75 72 70 6f 73 20 3d 20 | {.- ..c|urpos = |
|00004ec0| 66 74 65 6c 6c 28 66 70 | 29 3b 0a 20 20 09 09 73 |ftell(fp|);. ..s|
|00004ed0| 77 69 74 63 68 20 28 69 | 29 20 7b 0a 2d 2d 2d 20 |witch (i|) {.--- |
|00004ee0| 31 36 34 2c 31 36 35 20 | 2d 2d 2d 2d 0a 2a 2a 2a |164,165 |----.***|
|00004ef0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0a 2a 2a 2a |********|****.***|
|00004f00| 20 32 32 30 2c 32 32 32 | 20 2a 2a 2a 2a 0a 20 20 | 220,222| ****. |
|00004f10| 09 09 09 67 65 74 66 69 | 65 6c 64 28 68 70 2d 3e |...getfi|eld(hp->|
|00004f20| 64 69 73 74 72 69 62 75 | 74 69 6f 6e 2c 20 73 69 |distribu|tion, si|
|00004f30| 7a 65 6f 66 28 68 70 2d | 3e 64 69 73 74 72 69 62 |zeof(hp-|>distrib|
|00004f40| 75 74 69 6f 6e 29 29 3b | 0a 21 20 09 09 09 69 66 |ution));|.! ...if|
|00004f50| 20 28 73 74 72 63 6d 70 | 28 68 70 2d 3e 64 69 73 | (strcmp|(hp->dis|
|00004f60| 74 72 69 62 75 74 69 6f | 6e 2c 20 22 6e 65 74 22 |tributio|n, "net"|
|00004f70| 29 20 3d 3d 20 30 29 0a | 20 20 09 09 09 09 68 70 |) == 0).| ....hp|
|00004f80| 2d 3e 64 69 73 74 72 69 | 62 75 74 69 6f 6e 5b 30 |->distri|bution[0|
|00004f90| 5d 20 3d 20 27 5c 30 27 | 3b 0a 2d 2d 2d 20 32 32 |] = '\0'|;.--- 22|
|00004fa0| 30 2c 32 32 33 20 2d 2d | 2d 2d 0a 20 20 09 09 09 |0,223 --|--. ...|
|00004fb0| 67 65 74 66 69 65 6c 64 | 28 68 70 2d 3e 64 69 73 |getfield|(hp->dis|
|00004fc0| 74 72 69 62 75 74 69 6f | 6e 2c 20 73 69 7a 65 6f |tributio|n, sizeo|
|00004fd0| 66 28 68 70 2d 3e 64 69 | 73 74 72 69 62 75 74 69 |f(hp->di|stributi|
|00004fe0| 6f 6e 29 29 3b 0a 21 20 | 09 09 09 69 66 20 28 73 |on));.! |...if (s|
|00004ff0| 74 72 63 6d 70 28 68 70 | 2d 3e 64 69 73 74 72 69 |trcmp(hp|->distri|
|00005000| 62 75 74 69 6f 6e 2c 20 | 22 6e 65 74 22 29 20 3d |bution, |"net") =|
|00005010| 3d 20 30 0a 21 20 09 09 | 09 09 7c 7c 20 73 74 72 |= 0.! ..|..|| str|
|00005020| 63 6d 70 28 68 70 2d 3e | 64 69 73 74 72 69 62 75 |cmp(hp->|distribu|
|00005030| 74 69 6f 6e 2c 20 22 77 | 6f 72 6c 64 22 29 20 3d |tion, "w|orld") =|
|00005040| 3d 20 30 29 0a 20 20 09 | 09 09 09 68 70 2d 3e 64 |= 0). .|...hp->d|
|00005050| 69 73 74 72 69 62 75 74 | 69 6f 6e 5b 30 5d 20 3d |istribut|ion[0] =|
|00005060| 20 27 5c 30 27 3b 0a 2a | 2a 2a 2a 2a 2a 2a 2a 2a | '\0';.*|********|
|00005070| 2a 2a 2a 2a 2a 2a 0a 2a | 2a 2a 20 32 34 32 2c 32 |******.*|** 242,2|
|00005080| 34 33 20 2a 2a 2a 2a 0a | 2d 2d 2d 20 32 34 33 2c |43 ****.|--- 243,|
|00005090| 32 34 37 20 2d 2d 2d 2d | 0a 20 20 09 09 09 62 72 |247 ----|. ...br|
|000050a0| 65 61 6b 3b 0a 2b 20 09 | 09 63 61 73 65 20 53 55 |eak;.+ .|.case SU|
|000050b0| 50 45 52 53 45 44 45 53 | 3a 0a 2b 20 09 09 09 67 |PERSEDES|:.+ ...g|
|000050c0| 65 74 66 69 65 6c 64 28 | 68 70 2d 3e 73 75 70 65 |etfield(|hp->supe|
|000050d0| 72 73 65 64 65 73 2c 20 | 73 69 7a 65 6f 66 28 68 |rsedes, |sizeof(h|
|000050e0| 70 2d 3e 73 75 70 65 72 | 73 65 64 65 73 29 29 3b |p->super|sedes));|
|000050f0| 0a 2b 20 09 09 09 62 72 | 65 61 6b 3b 0a 20 20 09 |.+ ...br|eak;. .|
|00005100| 09 2f 2a 20 64 69 73 63 | 61 72 64 20 74 68 65 73 |./* disc|ard thes|
|00005110| 65 20 6c 69 6e 65 73 20 | 2a 2f 0a 2a 2a 2a 2a 2a |e lines |*/.*****|
|00005120| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0a 2a 2a 2a 20 32 |********|**.*** 2|
|00005130| 36 35 2c 32 36 38 20 2a | 2a 2a 2a 0a 20 20 0a 2d |65,268 *|***. .-|
|00005140| 20 09 69 66 20 28 2a 62 | 66 72 20 21 3d 20 27 5c | .if (*b|fr != '\|
|00005150| 6e 27 29 0a 2d 20 09 09 | 66 73 65 65 6b 28 66 70 |n').- ..|fseek(fp|
|00005160| 2c 20 63 75 72 70 6f 73 | 2c 20 30 29 3b 0a 20 20 |, curpos|, 0);. |
|00005170| 09 69 66 20 28 28 68 70 | 2d 3e 66 72 6f 6d 5b 30 |.if ((hp|->from[0|
|00005180| 5d 20 7c 7c 20 68 70 2d | 3e 70 61 74 68 5b 30 5d |] || hp-|>path[0]|
|00005190| 29 20 26 26 20 68 70 2d | 3e 73 75 62 64 61 74 65 |) && hp-|>subdate|
|000051a0| 5b 30 5d 20 26 26 20 68 | 70 2d 3e 69 64 65 6e 74 |[0] && h|p->ident|
|000051b0| 5b 30 5d 29 0a 2d 2d 2d | 20 32 36 39 2c 32 37 30 |[0]).---| 269,270|
|000051c0| 20 2d 2d 2d 2d 0a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a | ----.**|********|
|000051d0| 2a 2a 2a 2a 2a 0a 2a 2a | 2a 20 35 33 36 2c 35 33 |*****.**|* 536,53|
|000051e0| 38 20 2a 2a 2a 2a 0a 20 | 20 0a 21 20 23 64 65 66 |8 ****. | .! #def|
|000051f0| 69 6e 65 20 69 74 73 28 | 74 79 70 65 29 20 28 70 |ine its(|type) (p|
|00005200| 72 65 66 69 78 28 70 74 | 72 2c 20 74 79 70 65 29 |refix(pt|r, type)|
|00005210| 29 0a 20 20 74 79 70 65 | 28 70 74 72 29 0a 2d 2d |). type|(ptr).--|
|00005220| 2d 20 35 33 38 2c 35 34 | 30 20 2d 2d 2d 2d 0a 20 |- 538,54|0 ----. |
|00005230| 20 0a 21 20 23 64 65 66 | 69 6e 65 20 69 74 73 28 | .! #def|ine its(|
|00005240| 74 79 70 65 29 20 28 50 | 52 45 46 49 58 28 70 74 |type) (P|REFIX(pt|
|00005250| 72 2c 20 74 79 70 65 29 | 29 0a 20 20 74 79 70 65 |r, type)|). type|
|00005260| 28 70 74 72 29 0a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |(ptr).**|********|
|00005270| 2a 2a 2a 2a 2a 0a 2a 2a | 2a 20 35 36 34 2c 35 36 |*****.**|* 564,56|
|00005280| 35 20 2a 2a 2a 2a 0a 2d | 2d 2d 20 35 36 36 2c 35 |5 ****.-|-- 566,5|
|00005290| 36 38 20 2d 2d 2d 2d 0a | 20 20 09 09 72 65 74 75 |68 ----.| ..retu|
|000052a0| 72 6e 20 53 55 42 4d 49 | 54 3b 0a 2b 20 23 65 6e |rn SUBMI|T;.+ #en|
|000052b0| 64 69 66 20 2f 2a 20 4f | 4c 44 20 2a 2f 0a 20 20 |dif /* O|LD */. |
|000052c0| 09 69 66 20 28 69 74 73 | 28 22 52 65 63 65 69 76 |.if (its|("Receiv|
|000052d0| 65 64 3a 20 22 29 29 0a | 2a 2a 2a 2a 2a 2a 2a 2a |ed: ")).|********|
|000052e0| 2a 2a 2a 2a 2a 2a 2a 0a | 2a 2a 2a 20 35 36 36 2c |*******.|*** 566,|
|000052f0| 35 36 38 20 2a 2a 2a 2a | 0a 20 20 09 09 72 65 74 |568 ****|. ..ret|
|00005300| 75 72 6e 20 52 45 43 45 | 49 56 45 3b 0a 2d 20 23 |urn RECE|IVE;.- #|
|00005310| 65 6e 64 69 66 20 2f 2a | 20 4f 4c 44 20 2a 2f 0a |endif /*| OLD */.|
|00005320| 20 20 09 69 66 20 28 69 | 74 73 28 22 45 78 70 69 | .if (i|ts("Expi|
|00005330| 72 65 73 3a 20 22 29 29 | 0a 2d 2d 2d 20 35 36 39 |res: "))|.--- 569|
|00005340| 2c 35 37 30 20 2d 2d 2d | 2d 0a 2a 2a 2a 2a 2a 2a |,570 ---|-.******|
|00005350| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0a 2a 2a 2a 20 35 38 |********|*.*** 58|
|00005360| 33 2c 35 38 38 20 2a 2a | 2a 2a 0a 20 20 09 09 72 |3,588 **|**. ..r|
|00005370| 65 74 75 72 6e 20 46 4f | 4c 4c 4f 57 54 4f 3b 0a |eturn FO|LLOWTO;.|
|00005380| 2d 20 09 69 66 20 28 69 | 74 73 28 22 50 6f 73 74 |- .if (i|ts("Post|
|00005390| 69 6e 67 2d 56 65 72 73 | 69 6f 6e 3a 20 22 29 29 |ing-Vers|ion: "))|
|000053a0| 0a 2d 20 09 09 72 65 74 | 75 72 6e 20 50 4f 53 54 |.- ..ret|urn POST|
|000053b0| 56 45 52 53 49 4f 4e 3b | 0a 2d 20 09 69 66 20 28 |VERSION;|.- .if (|
|000053c0| 69 74 73 28 22 52 65 6c | 61 79 2d 56 65 72 73 69 |its("Rel|ay-Versi|
|000053d0| 6f 6e 3a 20 22 29 29 0a | 2d 20 09 09 72 65 74 75 |on: ")).|- ..retu|
|000053e0| 72 6e 20 52 45 4c 41 59 | 56 45 52 53 49 4f 4e 3b |rn RELAY|VERSION;|
|000053f0| 0a 20 20 09 69 66 20 28 | 69 74 73 28 22 44 69 73 |. .if (|its("Dis|
|00005400| 74 72 69 62 75 74 69 6f | 6e 3a 20 22 29 29 0a 2d |tributio|n: ")).-|
|00005410| 2d 2d 20 35 38 35 2c 35 | 38 36 20 2d 2d 2d 2d 0a |-- 585,5|86 ----.|
|00005420| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0a |********|*******.|
|00005430| 2a 2a 2a 20 36 30 33 2c | 36 30 34 20 2a 2a 2a 2a |*** 603,|604 ****|
|00005440| 0a 2d 2d 2d 20 36 30 31 | 2c 36 30 34 20 2d 2d 2d |.--- 601|,604 ---|
|00005450| 2d 0a 20 20 09 09 72 65 | 74 75 72 6e 20 4e 46 46 |-. ..re|turn NFF|
|00005460| 52 4f 4d 3b 0a 2b 20 09 | 69 66 20 28 69 74 73 28 |ROM;.+ .|if (its(|
|00005470| 22 53 75 70 65 72 73 65 | 64 65 73 3a 20 22 29 29 |"Superse|des: "))|
|00005480| 0a 2b 20 09 09 72 65 74 | 75 72 6e 20 53 55 50 45 |.+ ..ret|urn SUPE|
|00005490| 52 53 45 44 45 53 3b 0a | 20 20 09 69 66 20 28 69 |RSEDES;.| .if (i|
|000054a0| 74 73 28 22 58 72 65 66 | 3a 20 22 29 29 0a 2a 2a |ts("Xref|: ")).**|
|000054b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0a 2a 2a |********|*****.**|
|000054c0| 2a 20 36 30 37 2c 36 30 | 38 20 2a 2a 2a 2a 0a 2d |* 607,60|8 ****.-|
|000054d0| 2d 2d 20 36 30 37 2c 36 | 31 32 20 2d 2d 2d 2d 0a |-- 607,6|12 ----.|
|000054e0| 20 20 09 09 72 65 74 75 | 72 6e 20 58 50 41 54 48 | ..retu|rn XPATH|
|000054f0| 3b 0a 2b 20 09 69 66 20 | 28 69 74 73 28 22 50 6f |;.+ .if |(its("Po|
|00005500| 73 74 69 6e 67 2d 56 65 | 72 73 69 6f 6e 3a 20 22 |sting-Ve|rsion: "|
|00005510| 29 29 0a 2b 20 09 09 72 | 65 74 75 72 6e 20 50 4f |)).+ ..r|eturn PO|
|00005520| 53 54 56 45 52 53 49 4f | 4e 3b 0a 2b 20 09 69 66 |STVERSIO|N;.+ .if|
|00005530| 20 28 69 74 73 28 22 52 | 65 6c 61 79 2d 56 65 72 | (its("R|elay-Ver|
|00005540| 73 69 6f 6e 3a 20 22 29 | 29 0a 2b 20 09 09 72 65 |sion: ")|).+ ..re|
|00005550| 74 75 72 6e 20 52 45 4c | 41 59 56 45 52 53 49 4f |turn REL|AYVERSIO|
|00005560| 4e 3b 0a 20 20 09 69 66 | 20 28 21 69 73 61 6c 70 |N;. .if| (!isalp|
|00005570| 68 61 28 2a 70 74 72 29 | 29 0a 2a 2a 2a 2a 2a 2a |ha(*ptr)|).******|
|00005580| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0a 2a 2a 2a 20 36 32 |********|*.*** 62|
|00005590| 30 2c 36 32 31 20 2a 2a | 2a 2a 0a 2d 2d 2d 20 36 |0,621 **|**.--- 6|
|000055a0| 32 34 2c 36 32 38 20 2d | 2d 2d 2d 0a 20 20 20 2a |24,628 -|---. *|
|000055b0| 2f 0a 2b 20 23 69 66 6e | 64 65 66 20 44 4f 58 52 |/.+ #ifn|def DOXR|
|000055c0| 45 46 53 0a 2b 20 2f 2a | 41 52 47 53 55 53 45 44 |EFS.+ /*|ARGSUSED|
|000055d0| 2a 2f 0a 2b 20 23 65 6e | 64 69 66 20 2f 2a 20 21 |*/.+ #en|dif /* !|
|000055e0| 44 4f 58 52 45 46 53 20 | 2a 2f 0a 20 20 69 68 77 |DOXREFS |*/. ihw|
|000055f0| 72 69 74 65 28 68 70 2c | 20 66 70 2c 20 77 72 29 |rite(hp,| fp, wr)|
|00005600| 0a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.*******|********|
|00005610| 0a 2a 2a 2a 20 36 33 35 | 2c 36 33 37 20 2a 2a 2a |.*** 635|,637 ***|
|00005620| 2a 0a 20 20 09 20 2a 2f | 0a 21 20 09 69 66 20 28 |*. . */|.! .if (|
|00005630| 70 72 65 66 69 78 28 68 | 70 2d 3e 70 61 74 68 2c |prefix(h|p->path,|
|00005640| 20 50 41 54 48 53 59 53 | 4e 41 4d 45 29 20 26 26 | PATHSYS|NAME) &&|
|00005650| 0a 20 20 09 09 69 6e 64 | 65 78 28 4e 45 54 43 48 |. ..ind|ex(NETCH|
|00005660| 52 53 2c 20 68 70 2d 3e | 70 61 74 68 5b 73 74 72 |RS, hp->|path[str|
|00005670| 6c 65 6e 28 50 41 54 48 | 53 59 53 4e 41 4d 45 29 |len(PATH|SYSNAME)|
|00005680| 5d 29 29 0a 2d 2d 2d 20 | 36 34 32 2c 36 34 34 20 |])).--- |642,644 |
|00005690| 2d 2d 2d 2d 0a 20 20 09 | 20 2a 2f 0a 21 20 09 69 |----. .| */.! .i|
|000056a0| 66 20 28 50 52 45 46 49 | 58 28 68 70 2d 3e 70 61 |f (PREFI|X(hp->pa|
|000056b0| 74 68 2c 20 50 41 54 48 | 53 59 53 4e 41 4d 45 29 |th, PATH|SYSNAME)|
|000056c0| 20 26 26 0a 20 20 09 09 | 69 6e 64 65 78 28 4e 45 | &&. ..|index(NE|
|000056d0| 54 43 48 52 53 2c 20 68 | 70 2d 3e 70 61 74 68 5b |TCHRS, h|p->path[|
|000056e0| 73 74 72 6c 65 6e 28 50 | 41 54 48 53 59 53 4e 41 |strlen(P|ATHSYSNA|
|000056f0| 4d 45 29 5d 29 29 0a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |ME)])).*|********|
|00005700| 2a 2a 2a 2a 2a 2a 0a 2a | 2a 2a 20 36 39 31 2c 36 |******.*|** 691,6|
|00005710| 39 32 20 2a 2a 2a 2a 0a | 2d 2d 2d 20 36 39 38 2c |92 ****.|--- 698,|
|00005720| 37 30 31 20 2d 2d 2d 2d | 0a 20 20 09 09 66 70 72 |701 ----|. ..fpr|
|00005730| 69 6e 74 66 28 66 70 2c | 20 22 4e 66 2d 46 72 6f |intf(fp,| "Nf-Fro|
|00005740| 6d 3a 20 25 73 5c 6e 22 | 2c 20 68 70 2d 3e 6e 66 |m: %s\n"|, hp->nf|
|00005750| 5f 66 72 6f 6d 29 3b 0a | 2b 20 09 69 66 20 28 2a |_from);.|+ .if (*|
|00005760| 68 70 2d 3e 73 75 70 65 | 72 73 65 64 65 73 29 0a |hp->supe|rsedes).|
|00005770| 2b 20 09 09 66 70 72 69 | 6e 74 66 28 66 70 2c 20 |+ ..fpri|ntf(fp, |
|00005780| 22 53 75 70 65 72 73 65 | 64 65 73 3a 20 25 73 5c |"Superse|des: %s\|
|00005790| 6e 22 2c 20 68 70 2d 3e | 73 75 70 65 72 73 65 64 |n", hp->|supersed|
|000057a0| 65 73 29 3b 0a 20 20 23 | 69 66 64 65 66 20 44 4f |es);. #|ifdef DO|
|000057b0| 58 52 45 46 53 0a 49 6e | 64 65 78 3a 20 68 65 61 |XREFS.In|dex: hea|
|000057c0| 64 65 72 2e 68 0a 50 72 | 65 72 65 71 3a 20 32 2e |der.h.Pr|ereq: 2.|
|000057d0| 32 30 0a 2a 2a 2a 20 2e | 64 2f 68 65 61 64 65 72 |20.*** .|d/header|
|000057e0| 2e 68 09 57 65 64 20 4f | 63 74 20 20 37 20 31 36 |.h.Wed O|ct 7 16|
|000057f0| 3a 35 32 3a 30 34 20 31 | 39 38 37 0a 2d 2d 2d 20 |:52:04 1|987.--- |
|00005800| 68 65 61 64 65 72 2e 68 | 09 57 65 64 20 4f 63 74 |header.h|.Wed Oct|
|00005810| 20 20 37 20 31 38 3a 34 | 39 3a 30 33 20 31 39 38 | 7 18:4|9:03 198|
|00005820| 37 0a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |7.******|********|
|00005830| 2a 0a 2a 2a 2a 20 34 2c | 36 20 2a 2a 2a 2a 0a 20 |*.*** 4,|6 ****. |
|00005840| 20 0a 21 20 2f 2a 09 40 | 28 23 29 68 65 61 64 65 | .! /*.@|(#)heade|
|00005850| 72 2e 68 09 32 2e 32 30 | 09 32 2f 32 32 2f 38 37 |r.h.2.20|.2/22/87|
|00005860| 09 2a 2f 0a 20 20 0a 2d | 2d 2d 20 34 2c 36 20 2d |.*/. .-|-- 4,6 -|
|00005870| 2d 2d 2d 0a 20 20 0a 21 | 20 2f 2a 09 40 28 23 29 |---. .!| /*.@(#)|
|00005880| 68 65 61 64 65 72 2e 68 | 09 32 2e 32 31 09 31 30 |header.h|.2.21.10|
|00005890| 2f 37 2f 38 37 09 2a 2f | 0a 20 20 0a 2a 2a 2a 2a |/7/87.*/|. .****|
|000058a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 2a 2a 20 |********|***.*** |
|000058b0| 33 32 2c 33 33 20 2a 2a | 2a 2a 0a 2d 2d 2d 20 33 |32,33 **|**.--- 3|
|000058c0| 32 2c 33 34 20 2d 2d 2d | 2d 0a 20 20 09 63 68 61 |2,34 ---|-. .cha|
|000058d0| 72 09 6e 66 5f 66 72 6f | 6d 5b 42 55 46 4c 45 4e |r.nf_fro|m[BUFLEN|
|000058e0| 5d 3b 09 2f 2a 20 4e 66 | 2d 46 72 6f 6d 3a 09 09 |];./* Nf|-From:..|
|000058f0| 2a 2f 0a 2b 20 09 63 68 | 61 72 20 09 73 75 70 65 |*/.+ .ch|ar .supe|
|00005900| 72 73 65 64 65 73 5b 42 | 55 46 4c 45 4e 5d 3b 09 |rsedes[B|UFLEN];.|
|00005910| 2f 2a 20 53 75 70 65 72 | 73 65 64 65 73 3a 09 09 |/* Super|sedes:..|
|00005920| 2a 2f 0a 20 20 23 69 66 | 64 65 66 20 44 4f 58 52 |*/. #if|def DOXR|
|00005930| 45 46 53 0a 49 6e 64 65 | 78 3a 20 69 66 75 6e 63 |EFS.Inde|x: ifunc|
|00005940| 73 2e 63 0a 50 72 65 72 | 65 71 3a 20 32 2e 36 35 |s.c.Prer|eq: 2.65|
|00005950| 0a 2a 2a 2a 20 2e 64 2f | 69 66 75 6e 63 73 2e 63 |.*** .d/|ifuncs.c|
|00005960| 09 57 65 64 20 4f 63 74 | 20 20 37 20 31 36 3a 35 |.Wed Oct| 7 16:5|
|00005970| 32 3a 33 37 20 31 39 38 | 37 0a 2d 2d 2d 20 69 66 |2:37 198|7.--- if|
|00005980| 75 6e 63 73 2e 63 09 57 | 65 64 20 4f 63 74 20 20 |uncs.c.W|ed Oct |
|00005990| 37 20 31 38 3a 34 39 3a | 30 37 20 31 39 38 37 0a |7 18:49:|07 1987.|
|000059a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0a |********|*******.|
|000059b0| 2a 2a 2a 20 31 38 2c 32 | 30 20 2a 2a 2a 2a 0a 20 |*** 18,2|0 ****. |
|000059c0| 20 23 69 66 64 65 66 20 | 53 43 43 53 49 44 0a 21 | #ifdef |SCCSID.!|
|000059d0| 20 73 74 61 74 69 63 20 | 63 68 61 72 09 2a 53 63 | static |char.*Sc|
|000059e0| 63 73 49 64 20 3d 20 22 | 40 28 23 29 69 66 75 6e |csId = "|@(#)ifun|
|000059f0| 63 73 2e 63 09 32 2e 36 | 35 09 34 2f 31 30 2f 38 |cs.c.2.6|5.4/10/8|
|00005a00| 37 22 3b 0a 20 20 23 65 | 6e 64 69 66 20 2f 2a 20 |7";. #e|ndif /* |
|00005a10| 53 43 43 53 49 44 20 2a | 2f 0a 2d 2d 2d 20 31 38 |SCCSID *|/.--- 18|
|00005a20| 2c 32 30 20 2d 2d 2d 2d | 0a 20 20 23 69 66 64 65 |,20 ----|. #ifde|
|00005a30| 66 20 53 43 43 53 49 44 | 0a 21 20 73 74 61 74 69 |f SCCSID|.! stati|
|00005a40| 63 20 63 68 61 72 09 2a | 53 63 63 73 49 64 20 3d |c char.*|SccsId =|
|00005a50| 20 22 40 28 23 29 69 66 | 75 6e 63 73 2e 63 09 32 | "@(#)if|uncs.c.2|
|00005a60| 2e 36 36 09 31 30 2f 37 | 2f 38 37 22 3b 0a 20 20 |.66.10/7|/87";. |
|00005a70| 23 65 6e 64 69 66 20 2f | 2a 20 53 43 43 53 49 44 |#endif /|* SCCSID|
|00005a80| 20 2a 2f 0a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a | */.****|********|
|00005a90| 2a 2a 2a 0a 2a 2a 2a 20 | 32 33 2c 32 34 20 2a 2a |***.*** |23,24 **|
|00005aa0| 2a 2a 0a 2d 2d 2d 20 32 | 33 2c 32 36 20 2d 2d 2d |**.--- 2|3,26 ---|
|00005ab0| 2d 0a 20 20 0a 2b 20 65 | 78 74 65 72 6e 20 6c 6f |-. .+ e|xtern lo|
|00005ac0| 6e 67 09 6c 6f 63 61 6c | 69 7a 65 28 29 3b 0a 2b |ng.local|ize();.+|
|00005ad0| 20 0a 20 20 2f 2a 4c 49 | 4e 54 4c 49 42 52 41 52 | . /*LI|NTLIBRAR|
|00005ae0| 59 2a 2f 0a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |Y*/.****|********|
|00005af0| 2a 2a 2a 0a 2a 2a 2a 20 | 36 32 2c 36 33 20 2a 2a |***.*** |62,63 **|
|00005b00| 2a 2a 0a 2d 2d 2d 20 36 | 34 2c 36 38 20 2d 2d 2d |**.--- 6|4,68 ---|
|00005b10| 2d 0a 20 20 0a 2b 20 23 | 69 66 6e 64 65 66 20 47 |-. .+ #|ifndef G|
|00005b20| 45 4e 45 52 49 43 50 41 | 54 48 0a 2b 20 2f 2a 41 |ENERICPA|TH.+ /*A|
|00005b30| 52 47 53 55 53 45 44 2a | 2f 0a 2b 20 23 65 6e 64 |RGSUSED*|/.+ #end|
|00005b40| 69 66 20 2f 2a 20 21 47 | 45 4e 45 52 49 43 50 41 |if /* !G|ENERICPA|
|00005b50| 54 48 20 2a 2f 0a 20 20 | 62 72 6f 61 64 63 61 73 |TH */. |broadcas|
|00005b60| 74 28 69 73 5f 72 6e 65 | 77 73 29 0a 2a 2a 2a 2a |t(is_rne|ws).****|
|00005b70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 2a 2a 20 |********|***.*** |
|00005b80| 39 36 2c 39 38 20 2a 2a | 2a 2a 0a 20 20 09 69 66 |96,98 **|**. .if|
|00005b90| 20 28 21 69 73 5f 72 6e | 65 77 73 20 26 26 20 0a | (!is_rn|ews && .|
|00005ba0| 21 20 09 09 73 74 72 6e | 63 6d 70 28 50 41 54 48 |! ..strn|cmp(PATH|
|00005bb0| 53 59 53 4e 41 4d 45 2c | 20 68 2e 70 61 74 68 2c |SYSNAME,| h.path,|
|00005bc0| 20 28 6c 65 6e 20 3d 20 | 73 74 72 6c 65 6e 28 50 | (len = |strlen(P|
|00005bd0| 41 54 48 53 59 53 4e 41 | 4d 45 29 29 29 20 3d 3d |ATHSYSNA|ME))) ==|
|00005be0| 20 30 0a 20 20 09 09 26 | 26 20 69 6e 64 65 78 28 | 0. ..&|& index(|
|00005bf0| 4e 45 54 43 48 52 53 2c | 20 68 2e 70 61 74 68 5b |NETCHRS,| h.path[|
|00005c00| 6c 65 6e 5d 29 29 0a 2d | 2d 2d 20 31 30 31 2c 31 |len])).-|-- 101,1|
|00005c10| 30 33 20 2d 2d 2d 2d 0a | 20 20 09 69 66 20 28 21 |03 ----.| .if (!|
|00005c20| 69 73 5f 72 6e 65 77 73 | 20 26 26 20 0a 21 20 09 |is_rnews| && .! .|
|00005c30| 09 53 54 52 4e 43 4d 50 | 28 50 41 54 48 53 59 53 |.STRNCMP|(PATHSYS|
|00005c40| 4e 41 4d 45 2c 20 68 2e | 70 61 74 68 2c 20 28 6c |NAME, h.|path, (l|
|00005c50| 65 6e 20 3d 20 73 74 72 | 6c 65 6e 28 50 41 54 48 |en = str|len(PATH|
|00005c60| 53 59 53 4e 41 4d 45 29 | 29 29 20 3d 3d 20 30 0a |SYSNAME)|)) == 0.|
|00005c70| 20 20 09 09 26 26 20 69 | 6e 64 65 78 28 4e 45 54 | ..&& i|ndex(NET|
|00005c80| 43 48 52 53 2c 20 68 2e | 70 61 74 68 5b 6c 65 6e |CHRS, h.|path[len|
|00005c90| 5d 29 29 0a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |])).****|********|
|00005ca0| 2a 2a 2a 0a 2a 2a 2a 20 | 31 31 35 2c 31 31 37 20 |***.*** |115,117 |
|00005cb0| 2a 2a 2a 2a 0a 20 20 09 | 09 63 68 61 72 20 2a 64 |****. .|.char *d|
|00005cc0| 69 73 74 20 3d 20 68 2e | 64 69 73 74 72 69 62 75 |ist = h.|distribu|
|00005cd0| 74 69 6f 6e 3b 0a 21 20 | 09 09 69 66 20 28 73 74 |tion;.! |..if (st|
|00005ce0| 72 6e 63 6d 70 28 73 72 | 65 63 2e 73 5f 6e 61 6d |rncmp(sr|ec.s_nam|
|00005cf0| 65 2c 20 4c 4f 43 41 4c | 50 41 54 48 53 59 53 4e |e, LOCAL|PATHSYSN|
|00005d00| 41 4d 45 2c 20 53 4e 4c | 4e 29 20 3d 3d 20 30 29 |AME, SNL|N) == 0)|
|00005d10| 0a 20 20 09 09 09 63 6f | 6e 74 69 6e 75 65 3b 0a |. ...co|ntinue;.|
|00005d20| 2d 2d 2d 20 31 32 30 2c | 31 32 32 20 2d 2d 2d 2d |--- 120,|122 ----|
|00005d30| 0a 20 20 09 09 63 68 61 | 72 20 2a 64 69 73 74 20 |. ..cha|r *dist |
|00005d40| 3d 20 68 2e 64 69 73 74 | 72 69 62 75 74 69 6f 6e |= h.dist|ribution|
|00005d50| 3b 0a 21 20 09 09 69 66 | 20 28 53 54 52 4e 43 4d |;.! ..if| (STRNCM|
|00005d60| 50 28 73 72 65 63 2e 73 | 5f 6e 61 6d 65 2c 20 4c |P(srec.s|_name, L|
|00005d70| 4f 43 41 4c 50 41 54 48 | 53 59 53 4e 41 4d 45 2c |OCALPATH|SYSNAME,|
|00005d80| 20 53 4e 4c 4e 29 20 3d | 3d 20 30 29 0a 20 20 09 | SNLN) =|= 0). .|
|00005d90| 09 09 63 6f 6e 74 69 6e | 75 65 3b 0a 2a 2a 2a 2a |..contin|ue;.****|
|00005da0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 2a 2a 20 |********|***.*** |
|00005db0| 31 32 38 2c 31 33 30 20 | 2a 2a 2a 2a 0a 20 20 09 |128,130 |****. .|
|00005dc0| 09 77 68 69 6c 65 20 28 | 2a 68 70 74 72 20 21 3d |.while (|*hptr !=|
|00005dd0| 20 27 5c 30 27 29 20 7b | 0a 21 20 09 09 09 69 66 | '\0') {|.! ...if|
|00005de0| 20 28 73 74 72 6e 63 6d | 70 28 73 72 65 63 2e 73 | (strncm|p(srec.s|
|00005df0| 5f 6e 61 6d 65 2c 20 68 | 70 74 72 2c 20 53 4e 4c |_name, h|ptr, SNL|
|00005e00| 4e 29 20 3d 3d 20 30 29 | 0a 20 20 09 09 09 09 67 |N) == 0)|. ....g|
|00005e10| 6f 74 6f 20 63 6f 6e 74 | 69 6e 3b 0a 2d 2d 2d 20 |oto cont|in;.--- |
|00005e20| 31 33 33 2c 31 33 35 20 | 2d 2d 2d 2d 0a 20 20 09 |133,135 |----. .|
|00005e30| 09 77 68 69 6c 65 20 28 | 2a 68 70 74 72 20 21 3d |.while (|*hptr !=|
|00005e40| 20 27 5c 30 27 29 20 7b | 0a 21 20 09 09 09 69 66 | '\0') {|.! ...if|
|00005e50| 20 28 53 54 52 4e 43 4d | 50 28 73 72 65 63 2e 73 | (STRNCM|P(srec.s|
|00005e60| 5f 6e 61 6d 65 2c 20 68 | 70 74 72 2c 20 53 4e 4c |_name, h|ptr, SNL|
|00005e70| 4e 29 20 3d 3d 20 30 29 | 0a 20 20 09 09 09 09 67 |N) == 0)|. ....g|
|00005e80| 6f 74 6f 20 63 6f 6e 74 | 69 6e 3b 0a 2a 2a 2a 2a |oto cont|in;.****|
|00005e90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 2a 2a 20 |********|***.*** |
|00005ea0| 31 33 32 2c 31 33 34 20 | 2a 2a 2a 2a 0a 20 20 09 |132,134 |****. .|
|00005eb0| 09 09 09 77 68 69 6c 65 | 20 28 2a 73 70 74 72 20 |...while| (*sptr |
|00005ec0| 21 3d 20 27 5c 30 27 29 | 20 7b 0a 21 20 09 09 09 |!= '\0')| {.! ...|
|00005ed0| 09 09 69 66 20 28 73 74 | 72 6e 63 6d 70 28 73 70 |..if (st|rncmp(sp|
|00005ee0| 74 72 2c 20 68 70 74 72 | 2c 20 53 4e 4c 4e 29 20 |tr, hptr|, SNLN) |
|00005ef0| 3d 3d 20 30 29 0a 20 20 | 09 09 09 09 09 09 67 6f |== 0). |......go|
|00005f00| 74 6f 20 63 6f 6e 74 69 | 6e 3b 0a 2d 2d 2d 20 31 |to conti|n;.--- 1|
|00005f10| 33 37 2c 31 33 39 20 2d | 2d 2d 2d 0a 20 20 09 09 |37,139 -|---. ..|
|00005f20| 09 09 77 68 69 6c 65 20 | 28 2a 73 70 74 72 20 21 |..while |(*sptr !|
|00005f30| 3d 20 27 5c 30 27 29 20 | 7b 0a 21 20 09 09 09 09 |= '\0') |{.! ....|
|00005f40| 09 69 66 20 28 53 54 52 | 4e 43 4d 50 28 73 70 74 |.if (STR|NCMP(spt|
|00005f50| 72 2c 20 68 70 74 72 2c | 20 53 4e 4c 4e 29 20 3d |r, hptr,| SNLN) =|
|00005f60| 3d 20 30 29 0a 20 20 09 | 09 09 09 09 09 67 6f 74 |= 0). .|.....got|
|00005f70| 6f 20 63 6f 6e 74 69 6e | 3b 0a 2a 2a 2a 2a 2a 2a |o contin|;.******|
|00005f80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0a 2a 2a 2a 20 31 35 |********|*.*** 15|
|00005f90| 32 2c 31 35 34 20 2a 2a | 2a 2a 0a 20 20 09 09 09 |2,154 **|**. ...|
|00005fa0| 09 2a 73 70 74 72 20 3d | 20 27 5c 30 27 3b 0a 21 |.*sptr =| '\0';.!|
|00005fb0| 20 09 09 09 09 69 66 20 | 28 73 74 72 63 6d 70 28 | ....if |(strcmp(|
|00005fc0| 68 70 74 72 2c 20 73 72 | 65 63 2e 73 5f 6e 61 6d |hptr, sr|ec.s_nam|
|00005fd0| 65 29 20 3d 3d 20 30 29 | 20 7b 0a 20 20 09 09 09 |e) == 0)| {. ...|
|00005fe0| 09 09 2a 73 70 74 72 20 | 3d 20 27 2c 27 3b 0a 2d |..*sptr |= ',';.-|
|00005ff0| 2d 2d 20 31 35 37 2c 31 | 35 39 20 2d 2d 2d 2d 0a |-- 157,1|59 ----.|
|00006000| 20 20 09 09 09 09 2a 73 | 70 74 72 20 3d 20 27 5c | ....*s|ptr = '\|
|00006010| 30 27 3b 0a 21 20 09 09 | 09 09 69 66 20 28 53 54 |0';.! ..|..if (ST|
|00006020| 52 43 4d 50 28 68 70 74 | 72 2c 20 73 72 65 63 2e |RCMP(hpt|r, srec.|
|00006030| 73 5f 6e 61 6d 65 29 20 | 3d 3d 20 30 29 20 7b 0a |s_name) |== 0) {.|
|00006040| 20 20 09 09 09 09 09 2a | 73 70 74 72 20 3d 20 27 | .....*|sptr = '|
|00006050| 2c 27 3b 0a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |,';.****|********|
|00006060| 2a 2a 2a 0a 2a 2a 2a 20 | 31 36 30 2c 31 36 32 20 |***.*** |160,162 |
|00006070| 2a 2a 2a 2a 0a 20 20 09 | 09 09 7d 0a 21 20 09 09 |****. .|..}.! ..|
|00006080| 09 69 66 20 28 73 74 72 | 63 6d 70 28 68 70 74 72 |.if (str|cmp(hptr|
|00006090| 2c 20 73 72 65 63 2e 73 | 5f 6e 61 6d 65 29 20 3d |, srec.s|_name) =|
|000060a0| 3d 20 30 29 0a 20 20 09 | 09 09 09 63 6f 6e 74 69 |= 0). .|...conti|
|000060b0| 6e 75 65 3b 0a 2d 2d 2d | 20 31 36 35 2c 31 36 37 |nue;.---| 165,167|
|000060c0| 20 2d 2d 2d 2d 0a 20 20 | 09 09 09 7d 0a 21 20 09 | ----. |...}.! .|
|000060d0| 09 09 69 66 20 28 53 54 | 52 43 4d 50 28 68 70 74 |..if (ST|RCMP(hpt|
|000060e0| 72 2c 20 73 72 65 63 2e | 73 5f 6e 61 6d 65 29 20 |r, srec.|s_name) |
|000060f0| 3d 3d 20 30 29 0a 20 20 | 09 09 09 09 63 6f 6e 74 |== 0). |....cont|
|00006100| 69 6e 75 65 3b 0a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |inue;.**|********|
|00006110| 2a 2a 2a 2a 2a 0a 2a 2a | 2a 20 31 37 33 2c 31 37 |*****.**|* 173,17|
|00006120| 35 20 2a 2a 2a 2a 0a 20 | 20 09 09 09 66 6f 72 20 |5 ****. | ...for |
|00006130| 28 6d 20 3d 20 6d 63 61 | 73 74 3b 20 6d 20 3c 20 |(m = mca|st; m < |
|00006140| 26 6d 63 61 73 74 5b 6d | 63 63 6f 75 6e 74 5d 3b |&mcast[m|ccount];|
|00006150| 20 6d 2b 2b 29 0a 21 20 | 09 09 09 09 69 66 20 28 | m++).! |....if (|
|00006160| 73 74 72 63 6d 70 28 73 | 72 65 63 2e 73 5f 78 6d |strcmp(s|rec.s_xm|
|00006170| 69 74 2c 20 6d 2d 3e 6d | 63 5f 6e 61 6d 65 29 20 |it, m->m|c_name) |
|00006180| 3d 3d 20 30 29 0a 20 20 | 09 09 09 09 09 62 72 65 |== 0). |.....bre|
|00006190| 61 6b 3b 0a 2d 2d 2d 20 | 31 37 38 2c 31 38 30 20 |ak;.--- |178,180 |
|000061a0| 2d 2d 2d 2d 0a 20 20 09 | 09 09 66 6f 72 20 28 6d |----. .|..for (m|
|000061b0| 20 3d 20 6d 63 61 73 74 | 3b 20 6d 20 3c 20 26 6d | = mcast|; m < &m|
|000061c0| 63 61 73 74 5b 6d 63 63 | 6f 75 6e 74 5d 3b 20 6d |cast[mcc|ount]; m|
|000061d0| 2b 2b 29 0a 21 20 09 09 | 09 09 69 66 20 28 53 54 |++).! ..|..if (ST|
|000061e0| 52 43 4d 50 28 73 72 65 | 63 2e 73 5f 78 6d 69 74 |RCMP(sre|c.s_xmit|
|000061f0| 2c 20 6d 2d 3e 6d 63 5f | 6e 61 6d 65 29 20 3d 3d |, m->mc_|name) ==|
|00006200| 20 30 29 0a 20 20 09 09 | 09 09 09 62 72 65 61 6b | 0). ..|...break|
|00006210| 3b 0a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |;.******|********|
|00006220| 2a 0a 2a 2a 2a 20 31 39 | 33 2c 31 39 35 20 2a 2a |*.*** 19|3,195 **|
|00006230| 2a 2a 0a 20 20 09 09 09 | 66 6f 72 20 28 6d 20 3d |**. ...|for (m =|
|00006240| 20 6d 63 61 73 74 3b 20 | 6d 20 3c 20 26 6d 63 61 | mcast; |m < &mca|
|00006250| 73 74 5b 6d 63 63 6f 75 | 6e 74 5d 3b 20 6d 2b 2b |st[mccou|nt]; m++|
|00006260| 29 0a 21 20 09 09 09 09 | 69 66 20 28 73 74 72 63 |).! ....|if (strc|
|00006270| 6d 70 28 6d 2d 3e 6d 63 | 5f 6e 61 6d 65 2c 20 73 |mp(m->mc|_name, s|
|00006280| 72 65 63 2e 73 5f 6e 61 | 6d 65 29 20 3d 3d 20 30 |rec.s_na|me) == 0|
|00006290| 29 20 7b 0a 20 20 09 09 | 09 09 09 79 70 74 72 20 |) {. ..|...yptr |
|000062a0| 3d 20 73 79 73 70 74 72 | 73 3b 0a 2d 2d 2d 20 31 |= sysptr|s;.--- 1|
|000062b0| 39 38 2c 32 30 30 20 2d | 2d 2d 2d 0a 20 20 09 09 |98,200 -|---. ..|
|000062c0| 09 66 6f 72 20 28 6d 20 | 3d 20 6d 63 61 73 74 3b |.for (m |= mcast;|
|000062d0| 20 6d 20 3c 20 26 6d 63 | 61 73 74 5b 6d 63 63 6f | m < &mc|ast[mcco|
|000062e0| 75 6e 74 5d 3b 20 6d 2b | 2b 29 0a 21 20 09 09 09 |unt]; m+|+).! ...|
|000062f0| 09 69 66 20 28 53 54 52 | 43 4d 50 28 6d 2d 3e 6d |.if (STR|CMP(m->m|
|00006300| 63 5f 6e 61 6d 65 2c 20 | 73 72 65 63 2e 73 5f 6e |c_name, |srec.s_n|
|00006310| 61 6d 65 29 20 3d 3d 20 | 30 29 20 7b 0a 20 20 09 |ame) == |0) {. .|
|00006320| 09 09 09 09 79 70 74 72 | 20 3d 20 73 79 73 70 74 |....yptr| = syspt|
|00006330| 72 73 3b 0a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |rs;.****|********|
|00006340| 2a 2a 2a 0a 2a 2a 2a 20 | 32 30 34 2c 32 30 36 20 |***.*** |204,206 |
|00006350| 2a 2a 2a 2a 0a 20 20 23 | 65 6e 64 69 66 20 2f 2a |****. #|endif /*|
|00006360| 20 21 56 4d 53 20 2a 2f | 0a 21 20 09 09 09 09 28 | !VMS */|.! ....(|
|00006370| 73 74 72 6e 63 6d 70 28 | 68 2e 6e 62 75 66 2c 20 |strncmp(|h.nbuf, |
|00006380| 22 74 6f 2e 22 2c 20 33 | 29 20 21 3d 20 30 29 2c |"to.", 3|) != 0),|
|00006390| 0a 20 20 09 09 09 09 73 | 79 73 70 74 72 73 2c 20 |. ....s|ysptrs, |
|000063a0| 6d 63 29 29 0a 2d 2d 2d | 20 32 30 39 2c 32 31 31 |mc)).---| 209,211|
|000063b0| 20 2d 2d 2d 2d 0a 20 20 | 23 65 6e 64 69 66 20 2f | ----. |#endif /|
|000063c0| 2a 20 21 56 4d 53 20 2a | 2f 0a 21 20 09 09 09 09 |* !VMS *|/.! ....|
|000063d0| 28 53 54 52 4e 43 4d 50 | 28 68 2e 6e 62 75 66 2c |(STRNCMP|(h.nbuf,|
|000063e0| 20 22 74 6f 2e 22 2c 20 | 33 29 20 21 3d 20 30 29 | "to.", |3) != 0)|
|000063f0| 2c 0a 20 20 09 09 09 09 | 73 79 73 70 74 72 73 2c |,. ....|sysptrs,|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
